WebSVN – DevTools – Blame – /ManagerSuite/Release_Manager/trunk/web/_release_notes.asp

Rev	Author	Line No.	Line
119	ghuddy	1	`<%`
		2	`'=====================================================`
		3	`'\| \|`
121	hknight	4	`'\| RELEASE NOTES \|`
119	ghuddy	5	`'\| \|`
		6	`'=====================================================`
		7	`%>`
4254	dpurdie	8	`<!-- Required to support jiraIssues.vbs -->`
		9	`<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="class/classaspJSON.vbs"></SCRIPT>`
		10	`<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="common/base64encode.vbs"></SCRIPT>`
		11	`<SCRIPT LANGUAGE="VBScript" RUNAT=SERVER SRC="common/jiraIssues.vbs"></SCRIPT>`
119	ghuddy	12	`<%`
		13	`'------------ Variable Definition -------------`
		14	`Dim rsCQ`
		15	`Dim rsDepIss`
		16	`Dim SQLstr`
		17	`Dim fixedIssDict`
		18	`Dim notesIssDict`
		19	`Dim issArr()`
		20	`Dim depIssDict`
		21	`Dim sDocTitle`
		22	`Dim rsQry, rsTemp`
		23	`Dim iss_db_id, G1_template, G1_style, currG1`
		24	`Dim retVal`
		25	`Dim baseURL`
		26	`Dim rsProjId`
		27	`Dim rsPkgMetrics`
		28	`Dim rsCodeReviewURL`
129	ghuddy	29	`Dim vcsInfoCollector`
119	ghuddy	30	`'------------ Constants Declaration -----------`
		31	`Const enumLoc_iss_db = 0`
		32	`Const enumLoc_iss_id = 1`
		33	`Const enumLoc_iss_num = 2`
		34	`Const enumLoc_summary = 3`
		35	`Const enumLoc_status = 4`
		36	`Const enumLoc_priority = 5`
		37	`Const enumLoc_issue_type = 6`
		38	`'------------ Variable Init -------------------`
		39	`Set fixedIssDict = CreateObject("Scripting.Dictionary")`
		40	`Set notesIssDict = CreateObject("Scripting.Dictionary")`
		41	`Set depIssDict = CreateObject("Scripting.Dictionary")`
129	ghuddy	42	`Set vcsInfoCollector = CreateObject("Scripting.Dictionary")`
119	ghuddy	43	`'----------------------------------------------`
		44	`%>`
5266	dpurdie	45	`<!-- Local Java Script -->`
		46	`<script language="JavaScript">`
		47	`// Local Tips`
		48	`formTips.tips.following = stdTip(200, 'Following', 'The user may \'follow\' a package in one or more Projects.<p>When the package is released the user will be notified by email.' );`
6440	dpurdie	49	`formTips.tips.ripple_stop = stdTip(200, 'Ripple Stop', 'When set, will prevent the package being rippled. May be cleared to allow the ripple to continue.<p>If marked as \'Persistent\', then each new version will be marked to prevent rippling.' );`
6480	dpurdie	50	`formTips.tips.PreviousVcsTag = newTip(-150, 20, 200, 10, 'PREVIOUS VCS TAG','This is the vcs tag of the immediate ancestor version to the current package version.'+`
		51	`'<br><br>NOTE:<br>Derivation of this has no sensitivity to the selected release.');`
		52	`formTips.tips.PreviousSignificantVcsTag= newTip(-150, 20, 200, 10, 'PREVIOUS SIGNIFICANT VCS TAG',`
		53	`'This is the vcs tag of the ancestor version immediately preceding a significant (non-ripple) change that led to the current package version.'+`
		54	`'<br><br>NOTE:<br>Derivation of this has no sensitivity to the selected release.');`
		55
		56	`formTips.tips.PreviousNonRippleVcsTag= newTip(-150, 20, 200, 10, 'PREVIOUS NON RIPPLE VCS TAG',`
		57	`'This is the vcs tag of the preceding significant (non-ripple) change that led to the current package version.'+`
		58	`'<br><br>NOTE:<br>Derivation of this has no sensitivity to the selected release.');`
6497	dpurdie	59	`formTips.tips.CreationHints= newTip(-150, 20, 200, 10, 'HINTS FOR PACKAGE CREATION',`
		60	`'These are not correct commands. They are command hints to assist in creating a new package.');`
6642	dpurdie	61	`formTips.tips.BuildOwner= newTip(-150, 20, 200, 10, 'BUILD OWNER',`
		62	`'The Build Owner will be notified of Build Failures when a new package-version fails to build.' +`
		63	`'<p>The Build Owner is set to the person who created the new version or who released the version to the build system by setting its state to Pending.');`
6480	dpurdie	64
6497	dpurdie	65
6642	dpurdie	66
5266	dpurdie	67	`</script>`
119	ghuddy	68	`<%`
		69	`'----------------------------------------------------------------------------------------------------------------------------------------`
		70	`Function asDepIss ( SSiss_db_id, SScolumn )`
121	hknight	71	`If NOT depIssDict.Exists (SSiss_db_id) Then Exit Function`
119	ghuddy	72
121	hknight	73	`asDepIss = issArr ( SScolumn, CInt( depIssDict.Item (SSiss_db_id) ) )`
119	ghuddy	74	`End Function`
		75	`'----------------------------------------------------------------------------------------------------------------------------------------`
		76	`Function FixedIssues ( parPv_id )`
121	hknight	77	`Dim sqlstr, rsTemp`
		78	`sqlstr = "SELECT pv_id FROM cq_issues WHERE pv_id = "& parPv_id &" AND iss_state = "& enumISSUES_STATE_FIXED`
		79	`Set rsTemp = OraDatabase.DbCreateDynaset( sqlstr, cint(0))`
119	ghuddy	80
121	hknight	81	`If ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF)) Then`
		82	`FixedIssues = TRUE`
		83	`Else`
		84	`FixedIssues = FALSE`
		85	`End If`
119	ghuddy	86
121	hknight	87	`rsTemp.Close()`
		88	`Set rsTemp = nothing`
119	ghuddy	89	`End Function`
		90	`'----------------------------------------------------------------------------------------------------------------------------------------`
		91	`Function SQL_Package_Information ( nPv_id )`
121	hknight	92	`SQL_Package_Information = _`
		93	`" SELECT *"&_`
		94	`" FROM PACKAGE_VERSIONS pv"&_`
		95	`" WHERE pv.pv_id = "& nPv_id`
119	ghuddy	96	`End Function`
		97	`'----------------------------------------------------------------------------------------------------------------------------------------`
		98	`Function SQL_Dependency_Issues ( NNpv_id )`
121	hknight	99	`SQL_Dependency_Issues = _`
		100	`" SELECT pkg.pkg_name, pv.pkg_version, pv.pv_id, cqi.iss_db, cqi.iss_id, cqi.iss_state, pv.comments AS reasons"&_`
		101	`" FROM cq_issues cqi,"&_`
		102	`" package_dependencies dep,"&_`
		103	`" packages pkg,"&_`
		104	`" package_versions pv"&_`
		105	`" WHERE dep.pv_id = "& NNpv_id &_`
		106	`" AND dep.dpv_id = cqi.pv_id(+)"&_`
		107	`" AND dep.dpv_id = pv.pv_id(+)"&_`
		108	`" AND pv.pkg_id = pkg.pkg_id"&_`
		109	`" ORDER BY UPPER(pkg.pkg_name) ASC, cqi.iss_state DESC"`
119	ghuddy	110	`End Function`
		111	`'----------------------------------------------------------------------------------------------------------------------------------------`
		112	`Function SQL_Additional_Notes ( nPv_id )`
121	hknight	113	`SQL_Additional_Notes = ReadFile( rootPath & "queries\additional_notes.sql" )`
		114	`SQL_Additional_Notes = Replace( SQL_Additional_Notes, ":PV_ID", nPv_id )`
119	ghuddy	115	`End Function`
		116	`'----------------------------------------------------------------------------------------------------------------------------------------`
		117	`Function SQL_Unit_Tests ( nPv_id )`
121	hknight	118	`SQL_Unit_Tests = ReadFile( rootPath & "queries\unit_tests.sql" )`
		119	`SQL_Unit_Tests = Replace( SQL_Unit_Tests, ":PV_ID", nPv_id )`
119	ghuddy	120	`End Function`
		121	`'----------------------------------------------------------------------------------------------------------------------------------------`
121	hknight	122	`' Function returns the number of imported clearquest issues`
		123	`' and builds a string suitable for querying the clearquest issues database`
		124	`Function Get_Package_Issues ( NNpv_id, SSsql, DDfixedIss, DDnotesIssDict, nIssState )`
3975	dpurdie	125	`Dim rsTemp, sqlstr, DEVIiss, retVal`
119	ghuddy	126
121	hknight	127	`If IsObject(DDfixedIss) Then`
		128	`' Find this package issues`
		129	`sqlstr = "SELECT iss_db, iss_id, iss_state, notes FROM CQ_ISSUES WHERE pv_id="& NNpv_id &" AND iss_state = "& nIssState`
		130	`Else`
		131	`' Find dependency issues`
		132	`sqlstr = "SELECT iss_db, iss_id, iss_state, notes FROM CQ_ISSUES WHERE pv_id IN ( "&_`
		133	`" SELECT dpv_id FROM package_dependencies WHERE pv_id = "& NNpv_id &_`
		134	`" )"`
		135	`End If`
119	ghuddy	136
121	hknight	137	`Set rsTemp = OraDatabase.DbCreateDynaset( sqlstr, cint(0))`
		138	`retVal = rsTemp.RecordCount`
119	ghuddy	139
121	hknight	140	`DEVIiss = "-1"`
119	ghuddy	141
121	hknight	142	`While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))`
		143	`If CInt(rsTemp("iss_db")) = CInt(enumCLEARQUEST_DEVI_ID) Then`
		144	`DEVIiss = DEVIiss &","& rsTemp("iss_id")`
		145	`End If`
119	ghuddy	146
121	hknight	147	`If IsObject(DDfixedIss) Then`
		148	`' Store only Fixed Issues`
159	ghuddy	149	`If CInt(rsTemp("iss_state")) = CInt(enumISSUES_STATE_FIXED) AND _`
		150	`DDfixedIss.Exists(Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id"))) = false Then DDfixedIss.Add Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id")), ""`
121	hknight	151	`End If`
119	ghuddy	152
121	hknight	153	`If IsObject(DDnotesIssDict) Then`
		154	`' Store Notes`
159	ghuddy	155	`If Not IsNull(rsTemp("notes")) AND (rsTemp("notes") <> "") AND _`
		156	`DDnotesIssDict.Exists(Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id"))) = false Then DDnotesIssDict.Add Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id")), Cstr(rsTemp("notes"))`
121	hknight	157	`End If`
119	ghuddy	158
121	hknight	159	`rsTemp.MoveNext`
		160	`WEnd`
119	ghuddy	161
121	hknight	162	`' Construct SQL statement for CQ database`
		163	`SSsql = ReadFile( rootPath & "queries\cq_issues.sql" )`
		164	`SSsql = Replace( SSsql, "/enumCLEARQUEST_DEVI_ID/", enumCLEARQUEST_DEVI_ID)`
		165	`SSsql = Replace( SSsql, "/DEVIiss/", DEVIiss)`
119	ghuddy	166
121	hknight	167	`rsTemp.Close()`
		168	`Set rsTemp = nothing`
119	ghuddy	169
121	hknight	170	`Get_Package_Issues = retVal`
119	ghuddy	171
121	hknight	172	`End Function`
119	ghuddy	173	`'----------------------------------------------------------------------------------------------------------------------------------------`
		174	`Sub LastPvId (PvId)`
121	hknight	175	`Dim sqlstr`
119	ghuddy	176
131	ghuddy	177	`sqlstr = "SELECT pv_id, pkg_version, comments, last_pv_id FROM PACKAGE_VERSIONS WHERE PV_ID= "& PvId`
119	ghuddy	178
121	hknight	179	`Set rsQry = OraDatabase.DbCreateDynaset( sqlstr, cint(0) )`
119	ghuddy	180
		181	`End Sub`
		182	`'----------------------------------------------------------------------------------------------------------------------------------------`
		183	`Function Get_CQ_Issues ( SSsql, OOrsCQ )`
		184
121	hknight	185	`On Error Resume Next`
4553	dpurdie	186	`Set OOrsCQ = OraDatabase.DbCreateDynaset( SSsql, cint(0))`
121	hknight	187	`Get_CQ_Issues = Err.Number`
119	ghuddy	188
		189	`End Function`
		190	`'----------------------------------------------------------------------------------------------------------------------------------------`
		191	`Function Get_Dependency_CQ_Issues ( SSsql, OOrsCQ, DDdepIss, AAiss )`
121	hknight	192	`Dim recCnt`
119	ghuddy	193
121	hknight	194	`On Error Resume Next`
4553	dpurdie	195	`Set OOrsCQ = OraDatabase.DbCreateDynaset( SSsql, cint(0))`
119	ghuddy	196
121	hknight	197	`' Exit with error if error occurs`
		198	`Get_Dependency_CQ_Issues = Err.Number`
		199	`If Err.Number <> 0 Then Exit Function`
119	ghuddy	200
121	hknight	201	`recCnt = 1`
119	ghuddy	202
121	hknight	203	`While ((NOT OOrsCQ.BOF) AND (NOT OOrsCQ.EOF))`
		204	`ReDim Preserve AAiss( 6, recCnt )`
		205	`'If NOT DDdepIss.Exists Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id")) Then`
		206	`DDdepIss.Add Cstr(OOrsCQ("iss_db") &"."& OOrsCQ("iss_id")), Cstr(recCnt)`
		207	`'End If`
		208	`AAiss( enumLoc_iss_db, recCnt ) = OOrsCQ("iss_db")`
		209	`AAiss( enumLoc_iss_id, recCnt ) = OOrsCQ("iss_id")`
		210	`AAiss( enumLoc_iss_num, recCnt ) = OOrsCQ("iss_num")`
		211	`AAiss( enumLoc_summary, recCnt ) = OOrsCQ("summary")`
		212	`AAiss( enumLoc_status, recCnt ) = OOrsCQ("status")`
		213	`AAiss( enumLoc_priority, recCnt ) = OOrsCQ("priority")`
		214	`AAiss( enumLoc_issue_type, recCnt ) = OOrsCQ("issue_type")`
119	ghuddy	215
121	hknight	216	`recCnt = recCnt + 1`
		217	`OOrsCQ.MoveNext`
		218	`WEnd`
119	ghuddy	219
121	hknight	220	`OOrsCQ.Close()`
119	ghuddy	221	`End Function`
		222	`'----------------------------------------------------------------------------------------------------------------------------------------`
		223	`Sub Group_By ( rsG, styleG, currG )`
121	hknight	224	`If rsG = currG Then Exit Sub`
		225	`Response.write styleG`
		226	`'currG = rsG`
119	ghuddy	227	`End Sub`
		228	`'----------------------------------------------------------------------------------------------------------------------------------------`
		229	`Sub CheckUnitTestsState ( nPv_id, outMSG, outMSG_ID, outNote, outTestsFound )`
121	hknight	230	`Dim sqlstr, rsTemp`
		231	`sqlstr = ReadFile( rootPath & "queries\unit_test_entries_check.sql" )`
		232	`sqlstr = Replace( sqlstr, ":PV_ID", nPv_id)`
		233	`sqlstr = Replace( sqlstr, ":enumTEST_TYPE_NOT_DONE", enumTEST_TYPE_NOT_DONE)`
119	ghuddy	234
121	hknight	235	`Set rsTemp = OraDatabase.DbCreateDynaset( sqlstr, cint(0))`
119	ghuddy	236
121	hknight	237	`If ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF)) Then`
		238	`outMSG = rsTemp("msg")`
		239	`outMSG_ID = CInt(rsTemp("msg_id"))`
		240	`outNote = rsTemp("test_summary")`
		241	`outTestsFound = FALSE`
119	ghuddy	242
121	hknight	243	`If IsNull(rsTemp("msg")) Then outTestsFound = TRUE`
		244	`End If`
119	ghuddy	245
121	hknight	246	`rsTemp.Close()`
		247	`Set rsTemp = nothing`
119	ghuddy	248	`End Sub`
		249	`'----------------------------------------------------------------------------------------------------------------------------------------`
		250	`Function FormatAccepted ( sAccepted, nTest_id )`
121	hknight	251	`Dim tempSTR`
		252	`If IsNull(nTest_id) Then Exit Function`
119	ghuddy	253
121	hknight	254	`tempSTR = ""`
119	ghuddy	255
121	hknight	256	`If pageIsEditable Then`
		257	`tempSTR = "<select name='acc"& nTest_id &"' class='form_item'>"`
		258	`Else`
		259	`tempSTR = "<select name='acc"& nTest_id &"' class='form_item' disabled>"`
		260	`End If`
119	ghuddy	261
121	hknight	262	`If sAccepted = enumUNIT_TEST_ACCEPTED Then`
		263	`tempSTR = tempSTR &"<option></option>"&_`
		264	`"<option value='"& enumUNIT_TEST_ACCEPTED &"' SELECTED>Yes</option>"&_`
		265	`"<option value='"& enumUNIT_TEST_NOTACCEPTED &"'>No</option>"`
119	ghuddy	266
121	hknight	267	`ElseIf sAccepted = enumUNIT_TEST_NOTACCEPTED Then`
		268	`tempSTR = tempSTR &"<option></option>"&_`
		269	`"<option value='"& enumUNIT_TEST_ACCEPTED &"'>Yes</option>"&_`
		270	`"<option value='"& enumUNIT_TEST_NOTACCEPTED &"' SELECTED>No</option>"`
119	ghuddy	271
121	hknight	272	`Else`
		273	`tempSTR = tempSTR &"<option SELECTED></option>"&_`
		274	`"<option value='"& enumUNIT_TEST_ACCEPTED &"'>Yes</option>"&_`
		275	`"<option value='"& enumUNIT_TEST_NOTACCEPTED &"'>No</option>"`
119	ghuddy	276
121	hknight	277	`End If`
119	ghuddy	278
121	hknight	279	`tempSTR = tempSTR & "</select>"`
119	ghuddy	280
121	hknight	281	`FormatAccepted = tempSTR`
119	ghuddy	282
		283	`End Function`
		284	`'----------------------------------------------------------------------------------------------------------------------------------------`
		285	`Function SQL_CodeReview ( nPv_id )`
121	hknight	286	`SQL_CodeReview = _`
		287	`" SELECT cr.date_of_review, cr.time_spent, cr.review_reason, cr.rteam_domain_expert,"&_`
		288	`" cr.rteam_language_expert, cr.rteam_peer_developer, cr.rteam_author,"&_`
		289	`" cr.files_reviewed, cr.review_results, cr.issues_raised,"&_`
		290	`" cr.review_comments, cr.fnc_s_meets_functionality,"&_`
		291	`" cr.fnc_c_meets_functionality"&_`
		292	`" FROM code_reviews cr"&_`
		293	`" WHERE cr.pv_id = "& nPv_id`
119	ghuddy	294	`End Function`
		295	`'----------------------------------------------------------------------------------------------------------------------------------------`
		296	`Function SQL_Build_Env ( nPv_id )`
121	hknight	297	`SQL_Build_Env = _`
		298	`" SELECT pv.*, bm.BM_ID,"&_`
		299	`" bm.BM_NAME,"&_`
4134	dpurdie	300	`" pkgbinfo.BSA_ID,"&_`
		301	`" bsa.BSA_NAME"&_`
121	hknight	302	`" FROM PACKAGE_BUILD_INFO pkgbinfo,"&_`
		303	`" BUILD_MACHINES bm,"&_`
4134	dpurdie	304	`" PACKAGE_VERSIONS pv,"&_`
		305	`" BUILD_STANDARDS_ADDENDUM bsa"&_`
121	hknight	306	`" WHERE pkgbinfo.BM_ID = bm.BM_ID"&_`
		307	`" AND pv.PV_ID = pkgbinfo.PV_ID"&_`
		308	`" AND pkgbinfo.PV_ID = "& nPv_id &_`
4134	dpurdie	309	`" AND pkgbinfo.BSA_ID = bsa.BSA_ID"&_`
121	hknight	310	`" ORDER BY UPPER(bm.BM_NAME) "`
119	ghuddy	311	`End Function`
		312	`'----------------------------------------------------------------------------------------------------------------------------------------`
		313	`Function DecodeOverallResult ( ByVal cCheck )`
121	hknight	314	`If cCheck = "" OR IsNull(cCheck) Then cCheck = 0`
119	ghuddy	315
121	hknight	316	`Select Case CInt( cCheck )`
		317	`Case enumCODE_REVIEW_ACCEPTED`
		318	`DecodeOverallResult = "Accepted"`
		319	`Case enumCODE_REVIEW_MINOR_UPDATES`
		320	`DecodeOverallResult = "Minor updates required"`
		321	`Case enumCODE_REVIEW_MAJOR_REWORK`
		322	`DecodeOverallResult = "Major rework required"`
		323	`Case Else`
		324	`DecodeOverallResult = ""`
		325	`End Select`
119	ghuddy	326
		327	`End Function`
		328	`'----------------------------------------------------------------------------------------------------------------------------------------`
4134	dpurdie	329	`Function GetBuildType ( nBuildType, nBuildName )`
119	ghuddy	330
4134	dpurdie	331	`if (IsNull(nBuildType) OR (nBuildType = "")) Then`
		332	`GetBuildType = "Build type not defined"`
		333	`ElseIf (IsNull(nBuildName) OR (nBuildName = "") ) Then`
		334	`GetBuildType = "Build Name not defined"`
121	hknight	335	`Else`
4134	dpurdie	336	`GetBuildType = nBuildName`
121	hknight	337	`End If`
119	ghuddy	338
4134	dpurdie	339	`'' Wrap around brackets`
121	hknight	340	`GetBuildType = "("& GetBuildType &")"`
119	ghuddy	341
		342	`End Function`
		343	`'----------------------------------------------------------------------------------------------------------------------------------------`
		344	`Sub GetPackageMetrics (NNpv_id, rsTemp)`
		345
121	hknight	346	`OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT, ORATYPE_NUMBER`
119	ghuddy	347
121	hknight	348	`Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageMetrics.sql"), cint(0))`
119	ghuddy	349
121	hknight	350	`OraDatabase.Parameters.Remove "PV_ID"`
119	ghuddy	351
		352	`End Sub`
		353	`'----------------------------------------------------------------------------------------------------------------------------------------`
		354	`Sub GetCodeReviewURLs (NNpv_id, rsTemp)`
		355
121	hknight	356	`OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT, ORATYPE_NUMBER`
119	ghuddy	357
121	hknight	358	`Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("CodeReviewURLs.sql"), cint(0))`
119	ghuddy	359
121	hknight	360	`OraDatabase.Parameters.Remove "PV_ID"`
119	ghuddy	361
		362	`End Sub`
161	iaugusti	363
		364
		365	`'---------------------------------------------------------------`
		366	`Sub Query_Config_Spec (NNRtag_id, NNPv_id)`
		367	`OraDatabase.Parameters.Add "RTAG_ID", NNRtag_id, ORAPARM_INPUT, ORATYPE_NUMBER`
		368	`OraDatabase.Parameters.Add "PV_ID", NNPv_id, ORAPARM_INPUT, ORATYPE_NUMBER`
		369	`If NNRtag_id <> "" Then`
		370	`If pkgInfoHash.Item ("dlocked") <> "Y" Then`
		371	`Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("config_spec.sql"), cint(0))`
		372	`Else`
		373	`Set rsQry = OraDatabase.DbCreateDynaset( Replace(GetQuery("config_spec.sql"), "PV.LAST_PV_ID", "PV.PV_ID"), cint(0))`
		374	`End If`
		375	`Else`
		376	`If pkgInfoHash.Item ("dlocked") <> "Y" Then`
		377	`Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("config_spec_nortag.sql"), cint(0))`
		378	`Else`
		379	`Set rsQry = OraDatabase.DbCreateDynaset( Replace(GetQuery("config_spec_nortag.sql"), "PV.LAST_PV_ID", "PV.PV_ID"), cint(0))`
		380	`End If`
		381	`End If`
		382	`OraDatabase.Parameters.Remove "RTAG_ID"`
		383	`OraDatabase.Parameters.Remove "PV_ID"`
		384	`End Sub`
		385
		386	`'---------------------------------------------------------------`
167	brianf	387	`' Returns the jats extraction commands`
2735	dpurdie	388	`Sub Jats_Extract_Command (ByRef sjats_cmds(), ByRef ajats_cmd_test, ByRef sjats_cmds_qh, ByRef sjats_extractable)`
161	iaugusti	389	`Dim dlocked: dlocked = pkgInfoHash.Item("dlocked")`
169	brianf	390	`Dim pkg_vcs_tag: pkg_vcs_tag = Get_Pkg_Vcs_Tag(Request("pv_id"))`
1376	dpurdie	391	`Dim ii: ii = -1`
		392	`Dim baseCmd`
2735	dpurdie	393	`sjats_extractable = false`
161	iaugusti	394
6497	dpurdie	395	`sjats_cmds_qh = vcsInfoCollector.Item("vcs_tag")`
		396	`If ( sjats_cmds_qh = "CC" OR sjats_cmds_qh = "SVN" ) Then`
		397	`sjats_extractable = true`
		398	`End If`
		399
167	brianf	400	`' if not released then use last package version vcs tag and branch else use current vcs tag`
		401	`If dlocked <> "Y" Then`
		402	`' not released, so get last package version id`
1376	dpurdie	403
6497	dpurdie	404	`Dim last_version_valid`
167	brianf	405	`Dim last_pv_id: last_pv_id = pkgInfoHash.Item("last_pv_id")`
6497	dpurdie	406	`Dim last_pkg_vcs_tag`
1376	dpurdie	407	`Dim VcsType`
161	iaugusti	408
6497	dpurdie	409	`last_version_valid = TRUE`
		410	`If IsNull(pkgInfoHash.Item ("previous_version")) Then`
		411	`last_version_valid = FALSE`
		412	`ElseIf last_pv_id = pkgInfoHash.Item ("pv_id") Then`
		413	`last_version_valid = FALSE`
		414	`ElseIf pkgInfoHash.Item ("pkg_count") = 1 Then`
		415	`last_version_valid = FALSE`
		416	`End If`
		417
		418	`If last_version_valid Then`
		419	`last_pkg_vcs_tag = Get_Pkg_Vcs_Tag(last_pv_id)`
		420	`End If`
		421
2365	dpurdie	422	`If (last_version_valid AND last_pkg_vcs_tag <> "") Then`
		423	`VcsType = Mid(last_pkg_vcs_tag, 1, InStr(1, last_pkg_vcs_tag, "::") - 1 )`
		424	`sjats_cmds_qh = VcsType`
		425	`baseCmd = "jats vcsrelease -extract -label """ & last_pkg_vcs_tag & """"`
		426	`ii = ii+1 : sjats_cmds(ii) = baseCmd`
1376	dpurdie	427
		428	`' ClearCase extraction may get a project specific branch appended`
		429	`' This will be used to automatically branch the files in the package`
		430	`'`
		431	`If (VcsType = "CC") Then`
		432	`Call Query_Config_Spec (Request("rtag_id"), last_pv_id)`
		433	`Dim config_branch: config_branch = rsQry("config_spec_branch")`
		434	`If NOT IsNull(config_branch) AND (config_branch <> "") Then`
		435	`ii = ii+1 : sjats_cmds(ii) = baseCmd & " -branch " & config_branch`
		436	`End If`
		437	`End If`
		438
		439	`If (VcsType = "SVN") Then`
		440	`ii = ii+1 : sjats_cmds(ii) = baseCmd & " -devMode=Tag"`
		441	`ii = ii+1 : sjats_cmds(ii) = baseCmd & " -devMode=Tip"`
		442	`ii = ii+1 : sjats_cmds(ii) = baseCmd & " -devMode=Work"`
		443	`ii = ii+1 : sjats_cmds(ii) = baseCmd & " -devMode=Exact"`
		444	`End If`
167	brianf	445	`Else`
6497	dpurdie	446	`'ii = ii+1 : sjats_cmds(ii) = "No Previous version to extract"`
167	brianf	447	`End If`
1376	dpurdie	448
		449	`baseCmd = "jats vcsrelease -extract -label """ & pkg_vcs_tag & """"`
		450	`ii = ii+1 : sjats_cmds(ii) = baseCmd`
		451
161	iaugusti	452	`Else`
2735	dpurdie	453	`' released`
6497	dpurdie	454	`if sjats_extractable Then`
2735	dpurdie	455	`baseCmd = "jats vcsrelease -extract -label """ & pkg_vcs_tag & """"`
		456	`ii = ii+1 : sjats_cmds(ii) = baseCmd`
		457	`Else`
		458	`baseCmd = "Cannot be extracted with JATS"`
		459	`ii = ii+1 : sjats_cmds(ii) = baseCmd`
		460	`End If`
		461
161	iaugusti	462	`End If`
167	brianf	463
1376	dpurdie	464	`' Test Command`
2735	dpurdie	465	`if sjats_extractable Then`
		466	`ajats_cmd_test = "jats vcsrelease -test -label """ & pkg_vcs_tag & """"`
		467	`Else`
		468	`ajats_cmd_test = "Cannot be extracted with JATS"`
		469	`End If`
161	iaugusti	470
1376	dpurdie	471	`ReDim Preserve sjats_cmds(ii)`
161	iaugusti	472	`rsQry.Close()`
		473	`Set rsQry = nothing`
		474
		475	`End Sub`
		476
167	brianf	477	`'---------------------------------------------------------------`
		478	`' Returns the VCS tag for the specified package version`
2365	dpurdie	479	`' Note: ORAPARM_OUTPUT default size is 127 bytes. This is too short for some`
		480	`'`
169	brianf	481	`Function Get_Pkg_Vcs_Tag(apv_id)`
167	brianf	482	`OraDatabase.Parameters.Add "PV_ID", apv_id, ORAPARM_INPUT, ORATYPE_NUMBER`
2365	dpurdie	483	`OraDatabase.Parameters.Add "RETURN_CODE","xxxx", ORAPARM_OUTPUT, ORATYPE_VARCHAR2`
2735	dpurdie	484	`OraDatabase.Parameters("RETURN_CODE").MinimumSize = 200`
1376	dpurdie	485	`On Error Resume Next`
		486	`OraDatabase.ExecuteSQL ("BEGIN :RETURN_CODE := PK_RMAPI.RETURN_VCS_TAG( :PV_ID ); END;")`
		487	`Get_Pkg_Vcs_Tag = OraDatabase.Parameters("RETURN_CODE").Value`
		488	`On Error Goto 0`
167	brianf	489	`OraDatabase.Parameters.Remove "PV_ID"`
		490	`OraDatabase.Parameters.Remove "RETURN_CODE"`
		491	`End Function`
5266	dpurdie	492	`'-------------------------------------------------`
		493	`' Description: Return a string displaying if the user is following this package in theis Release`
119	ghuddy	494	`'----------------------------------------------------------------------------------------------------------------------------------------`
5266	dpurdie	495	`Function GetFollowing ()`
		496	`Dim rsQry`
5269	dpurdie	497	`Dim thisProject, otherProjects, someProjects`
5266	dpurdie	498
		499	`GetFollowing = "Not logged in"`
		500
		501	`If objAccessControl.UserLogedIn() Then`
		502	`OraDatabase.Parameters.Add "PKG_ID", pkgInfoHash.Item ("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBER`
		503	`OraDatabase.Parameters.Add "PROJ_ID", pkgInfoHash.Item ("proj_id"), ORAPARM_INPUT, ORATYPE_NUMBER`
		504	`OraDatabase.Parameters.Add "USER_ID", objAccessControl.UserId(), ORAPARM_INPUT, ORATYPE_NUMBER`
		505
5269	dpurdie	506	`If pkgInfoHash.Item ("proj_id") <> "" Then`
		507	`Set rsQry = OraDatabase.DbCreateDynaset( "SELECT * FROM PACKAGE_INTEREST WHERE PKG_ID = :PKG_ID AND PROJ_ID = :PROJ_ID AND USER_ID = :USER_ID", cint(0))`
		508	`thisProject = rsQry.RecordCount > 0`
5266	dpurdie	509
5269	dpurdie	510	`Set rsQry = OraDatabase.DbCreateDynaset( "SELECT * FROM PACKAGE_INTEREST WHERE PKG_ID = :PKG_ID AND PROJ_ID != :PROJ_ID AND USER_ID = :USER_ID", cint(0))`
		511	`otherProjects = rsQry.RecordCount > 0`
5266	dpurdie	512
5269	dpurdie	513	`If thisProject Then`
		514	`If otherProjects Then`
		515	`GetFollowing = "Yes. In this and " & rsQry.RecordCount & " other projects"`
		516	`Else`
		517	`GetFollowing = "Yes. Only this project"`
		518	`End If`
		519	`Else`
		520	`If otherProjects Then`
		521	`GetFollowing = "Yes. In " & rsQry.RecordCount & " other projects"`
		522	`Else`
		523	`GetFollowing = "No"`
		524	`End If`
5266	dpurdie	525	`End If`
5269	dpurdie	526
5266	dpurdie	527	`Else`
5269	dpurdie	528	`Set rsQry = OraDatabase.DbCreateDynaset( "SELECT * FROM PACKAGE_INTEREST WHERE PKG_ID = :PKG_ID AND USER_ID = :USER_ID", cint(0))`
		529	`someProjects = rsQry.RecordCount > 0`
		530
		531	`If rsQry.RecordCount > 0 Then`
		532	`GetFollowing = "Yes. In " & rsQry.RecordCount & " Projects"`
5266	dpurdie	533	`Else`
		534	`GetFollowing = "No"`
		535	`End If`
5269	dpurdie	536
5266	dpurdie	537	`End If`
		538
5269	dpurdie	539
5266	dpurdie	540	`OraDatabase.Parameters.Remove "USER_ID"`
		541	`OraDatabase.Parameters.Remove "PROJ_ID"`
		542	`OraDatabase.Parameters.Remove "PKG_ID"`
		543	`rsQry.Close()`
		544	`Set rsQry = nothing`
		545
5270	dpurdie	546	`If pageIsEditable Then`
		547	`GetFollowing = GetFollowing & "<img class='image12 vixIframeDialog' href='_iframe_pkgs_followed.asp?proj_id=" & pkgInfoHash.Item ("proj_id") & "&pkg_id=" & pkgInfoHash.Item ("pkg_id") & "' title='Follow: " & pkgInfoHash.Item ("pkg_name") &"' src='images/i_follow.gif'>"`
		548	`End If`
5266	dpurdie	549
		550	`End If`
		551	`End Function`
5980	dpurdie	552	`'---------------------------------------------------------------`
5338	dpurdie	553	`' Description: Return a string displaying licence information`
5980	dpurdie	554	`'---------------------------------------------------------------`
5338	dpurdie	555	`Function getLicence`
		556	`Dim rsQry, rsSql, lName`
		557	`Dim licenceList`
		558	`Dim joiner : joiner = ""`
		559	`Dim otherVersions : otherVersions = ""`
		560
		561	`Set licenceList=Server.CreateObject("Scripting.Dictionary")`
		562	`getLicence = ""`
		563
		564	`' Determine license for this package-version`
		565	`OraDatabase.Parameters.Add "PV_ID", pkgInfoHash.Item ("pv_id"), ORAPARM_INPUT, ORATYPE_NUMBER`
		566
		567	`Set rsQry = OraDatabase.DbCreateDynaset( _`
		568	`"SELECT l.NAME FROM LICENCES l, LICENCING ld" &_`
		569	`" WHERE l.LICENCE = ld.LICENCE " &_`
		570	`" and ld.PV_ID = :PV_ID" &_`
		571	`" ORDER by l.NAME" _`
		572	`, cint(0))`
		573
		574	`While (NOT rsQry.BOF) AND (NOT rsQry.EOF)`
		575	`lName = rsQry("name")`
		576	`getLicence = getLicence & joiner & lName`
		577	`licenceList.Add lName, "Y"`
		578	`joiner = ", "`
		579	`rsQry.MoveNext`
		580	`WEnd`
		581	`rsQry.Close()`
		582	`Set rsQry = nothing`
		583
		584	`'`
		585	`' Indicate if other versions have licences - ignore those we already know about`
		586	`' The data is stored on a package-version basis`
		587	`'`
		588	`Set rsQry = OraDatabase.DbCreateDynaset( _`
		589	`"SELECT UNIQUE ld.NAME" &_`
		590	`" FROM licencing l,LICENCES ld" &_`
		591	`" WHERE l.pv_id IN" &_`
		592	`" (SELECT pv_id" &_`
		593	`" FROM package_versions" &_`
		594	`" WHERE pkg_id IN" &_`
		595	`" (SELECT pkg_id FROM package_versions WHERE pv_id=:PV_ID)" &_`
		596	`" AND pv_id != :PV_ID" &_`
		597	`" )" &_`
		598	`" AND l.LICENCE = ld.LICENCE" &_`
		599	`" ORDER by ld.NAME" _`
		600	`, cint(0))`
		601
		602	`joiner = ""`
		603	`While (NOT rsQry.BOF) AND (NOT rsQry.EOF)`
		604	`lName = rsQry("name")`
		605	`If NOT licenceList.Exists(lName) Then`
		606	`otherVersions = otherVersions & joiner & rsQry("name")`
		607	`joiner = ", "`
		608	`End If`
		609	`rsQry.MoveNext`
		610	`WEnd`
5952	dpurdie	611
5338	dpurdie	612	`OraDatabase.Parameters.Remove "PV_ID"`
		613	`rsQry.Close()`
		614	`Set rsQry = nothing`
		615
		616	`If otherVersions <> "" Then`
		617	`getLicence = getLicence & ". Other Versions: " & otherVersions`
		618	`End If`
		619	`End Function`
5472	dpurdie	620	`'-------------------------------------------------`
		621	`Function getLinkUrl(pvid)`
		622	`Dim joiner : joiner = "?"`
		623
		624	`getLinkUrl = scriptName`
		625
		626	`If parRtag_id <> "" Then`
		627	`getLinkUrl = getLinkUrl + joiner + "rtag_id=" + parRtag_id`
		628	`joiner = "&"`
		629	`End If`
		630
		631	`getLinkUrl = getLinkUrl + joiner + "pv_id=" + pvid`
		632	`End Function`
6480	dpurdie	633	`'-------------------------------------------------`
		634	`' DisplayVersionRow - Display a row of vesrion information`
6497	dpurdie	635	`' pvid - pvid to process. Null -> "Initial Version"`
6480	dpurdie	636	`' title - row title`
		637	`' helpTag - Tag for help`
		638	`'`
		639	`Sub DisplayVersionRow( pvid, title, helpTag )`
		640	`Dim versionText`
		641	`Dim tagText`
		642	`Dim showLink`
		643	`Dim clipClass`
		644	`Dim ExtractText`
		645	`Dim queryResult`
		646
6497	dpurdie	647	`If IsNull(pvid) Then`
		648	`versionText = "Initial Version"`
		649	`tagText = NULL`
		650	`showLink = FALSE`
6480	dpurdie	651	`Else`
6497	dpurdie	652	`Set queryResult = OraDatabase.DbCreateDynaset( "SELECT pkg_version from package_versions where pv_id =" & pvid , cint(0))`
6480	dpurdie	653
6497	dpurdie	654	`If (NOT queryResult.BOF ) AND (NOT queryResult.EOF) Then`
		655	`versionText = queryResult("pkg_version")`
		656	`tagText = Get_Pkg_Vcs_Tag(pvid)`
		657	`showLink = isDefined("showPrevVerLinks")`
		658	`Else`
		659	`versionText = "Unknown"`
		660	`tagText = NULL`
		661	`showLink = FALSE`
		662	`End If`
		663
		664	`queryResult.Close()`
		665	`Set queryResult = nothing`
		666
		667	`End If`
		668
6480	dpurdie	669	`If sjats_extractable Then`
		670	`clipClass = "clip"`
		671	`ExtractText = NewLine_To_BR ( To_HTML(tagText) )`
		672	`Else`
		673	`clipClass = ""`
		674	`ExtractText = "Cannot be extracted with JATS"`
		675	`End If`
		676	`%>`
		677	`<tr>`
		678	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt"><strong><%=title%></strong><%=Quick_Help(helpTag)%></td>`
		679	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
		680	`<table width="100%" border="0" cellspacing="0" cellpadding="0">`
		681	`<tr class="sublbox_txt">`
		682	`<td width=15% colspan=2 nowrap class="sublbox_txt">`
		683	`<%=versionText%>`
		684	`<%If showLink Then %>`
		685	`<a href=<%=getLinkUrl(pvid)%>>`
6827	dpurdie	686	`<img src="images/i_link.gif" hspace="2" border="0" align='absmiddle' title="Show this version">`
6480	dpurdie	687	`</a>`
		688	`<%End If%>`
		689	`</td>`
		690	`<%If NOT IsNull(tagText) Then %>`
		691	`<td colspan=2 nowrap class="sublbox_txt <%=clipClass%>">`
		692	`<%=ExtractText%>`
		693	`</td>`
		694	`<%End If%>`
		695	`</tr>`
		696	`</table>`
		697	`</td>`
		698	`</tr>`
		699	`<%`
		700	`End Sub`
6497	dpurdie	701
		702	`'-------------------------------------------------`
		703	`' DisplayCreationCommands`
		704	`' Display commands that may be useful in the creation of the package`
		705	`'`
		706	`Sub DisplayCreationCommands`
6508	dpurdie	707	`Dim VcsType: VcsType = vcsInfoCollector.Item("vcs_tag")`
6497	dpurdie	708	`Dim title: title = "Package Creation Hints"`
		709	`Dim SvnUrl`
		710	`Dim SvnLabel`
		711
		712	`If VcsType = "SVN" Then`
		713	`If pkgInfoHash.Item("src_path") <> "" Then`
		714	`SvnUrl = pkgInfoHash.Item("src_path")`
		715	`Dim lastBit: lastBit = InStrRev(SvnUrl, "/" )`
		716	`If lastBit > 1 Then`
		717	`SvnUrl = Left(SvnUrl, lastBit-1)`
		718	`End If`
		719	`Else`
		720	`SvnUrl = "AUPERASVN0X/RepoName/" & pkgInfoHash.Item ("pkg_name")`
		721	`End If`
		722	`If pkgInfoHash.Item("pkg_label") <> "" Then`
		723	`SvnLabel = pkgInfoHash.Item("pkg_label")`
		724	`Else`
		725	`SvnLabel = "SomeLabel.WIP"`
		726	`End If`
		727
		728	`%>`
		729	`<tr>`
		730	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt" valign="top"><strong><%=title%></strong><%=Quick_Help("CreationHints")%></td>`
		731	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
		732	`<table width="100%" border="0" cellspacing="0" cellpadding="0">`
		733	`<tr><td nowrap class="sublbox_txt clip"> jats svn create_package -new <%=SvnUrl%> </td></tr>`
		734	`<tr><td nowrap class="sublbox_txt clip"> jats svn create_package -new <%=SvnUrl%> -import=<PkgDir> </td></tr>`
		735	`<tr><td nowrap class="sublbox_txt clip"> jats svn create_package -new <%=SvnUrl%> -label=<%=SvnLabel%> -import=<PkgDir> </td></tr>`
		736	`<tr><td nowrap class="sublbox_txt clip"> jats svn create_package -new <%=SvnUrl%> -label=<%=SvnLabel%> -import=<%=pkgInfoHash.Item ("pkg_name")%> </td></tr>`
		737	`</table>`
		738	`</td>`
		739	`</tr>`
		740	`<%`
6508	dpurdie	741	`Else`
		742	`%>`
		743	`<tr>`
		744	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt" valign="top"><strong><%=title%></strong></td>`
		745	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
		746	`Not supported under this version control system.`
		747	`</td>`
		748	`</tr>`
		749	`<%`
6497	dpurdie	750	`End If`
		751	`End Sub`
119	ghuddy	752	`%>`
		753	`<%`
		754	`'------------------ MAIN LINE --------------------`
		755	`'-------------------------------------------------`
5932	dpurdie	756	`If pkgInfoHash.Exists("pv_id") Then`
119	ghuddy	757	`%>`
		758	`<!-- PACKAGE INFORMATION --------------------------------------------------------------------------------------------------------------->`
6324	dpurdie	759	`<fieldset class="fset">`
		760	`<legend class="body_colb"><img src='images/s_info.gif' width='21' height='24' hspace='4' border='0' align='absmiddle'>Package Information</legend>`
		761	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
		762	`<%If pageIsEditable Then%>`
6827	dpurdie	763	`<span onClick="MM_openVixIFrame('_wform_pkg_info.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Package Info')" class="txt_linked pointer">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
6324	dpurdie	764	`<%End If%>`
		765	`</div>`
121	hknight	766	`<a name="PACKAGE_INFORMATION"></a>`
		767	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
129	ghuddy	768	`<%`
		769	`Set rsQry = OraDatabase.DbCreateDynaset( SQL_Package_Information ( parPv_id ), cint(0))`
161	iaugusti	770
137	ghuddy	771	`Call get_vcs_info_for_package( rsQry("pkg_label"), rsQry("build_type"), rsQry("vcs_type_id"), rsQry("dlocked"), vcsInfoCollector )`
161	iaugusti	772
		773	`%>`
129	ghuddy	774
161	iaugusti	775	`<%`
5293	dpurdie	776	`' Status:`
161	iaugusti	777	`Dim sstate`
171	brianf	778	`Dim bcan_unlock`
161	iaugusti	779	`Dim stitle`
171	brianf	780	`Dim bis_patch`
5293	dpurdie	781	`Dim spkgType`
6610	dpurdie	782	`Dim shref`
161	iaugusti	783
171	brianf	784	`bis_patch = not IsNull(pkgInfoHash.Item ("is_patch"))`
3616	dpurdie	785	`If bis_patch Then`
		786	`' the user can unlock a patch if they have permission`
		787	`' packages can be unlocked by the btnUnlockRelease button`
5061	dpurdie	788	`bcan_unlock = canActionControlInProject("UnlockPatch")`
5293	dpurdie	789	`spkgType = "Patch"`
3616	dpurdie	790	`Else`
5061	dpurdie	791	`bcan_unlock = canActionControlInProject("EditCriticalInfoForLockedPackage")`
5293	dpurdie	792	`spkgType = "Package"`
3616	dpurdie	793	`End If`
171	brianf	794
5086	dpurdie	795	`If pkgInfoHash.Item("is_sdkpkg") Then bcan_unlock = FALSE`
		796
3959	dpurdie	797	`Select Case pkgInfoHash.Item ("dlocked")`
		798	`Case "Y" sstate = "Released"`
		799	`Case "N" sstate = "Not Released"`
		800	`Case "P" sstate = "Not Released. Pending approval"`
6181	dpurdie	801	`Case "A" sstate = "Not Released. Approved for build"`
3959	dpurdie	802	`Case "R" sstate = "Not Released. Rejected"`
		803	`Case Else sstate = "Not Released. Invalid State"`
		804	`End Select`
		805
171	brianf	806	`If bcan_unlock Then`
161	iaugusti	807	`If (pkgInfoHash.Item ("dlocked") = "Y") Then`
5293	dpurdie	808	`' Unlock patch/package.`
		809	`stitle="Unlock the " & spkgType`
161	iaugusti	810	`shref="_s_unlock_package.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id`
5293	dpurdie	811
161	iaugusti	812	`ElseIf (pkgInfoHash.Item ("dlocked") = "N") Then`
5293	dpurdie	813	`' lock patch/package.`
		814	`stitle="Lock the "& spkgType &". Release requirements are not applied."`
161	iaugusti	815	`shref="_s_lock_package.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id`
5293	dpurdie	816
3616	dpurdie	817	`Else`
5293	dpurdie	818	`' unlock patch/package.`
		819	`stitle="Unlock the " & spkgType`
3616	dpurdie	820	`shref="_s_unlock_package.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id`
		821	`bcan_unlock = FALSE`
161	iaugusti	822	`End If`
		823	`End if`
129	ghuddy	824	`%>`
161	iaugusti	825
121	hknight	826	`<tr>`
161	iaugusti	827	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">`
6579	dpurdie	828	`<% If bcan_unlock Then %>`
6827	dpurdie	829	`<a class='sublbox_txt' title='<%=stitle%>' href='<%=shref%>'><b>Status:</b> <img src='images/i_edit.gif' width='12' height='12' border='0' align='absmiddle'></a>`
171	brianf	830	`<% Else %>`
6827	dpurdie	831	`<b>Status:</b><img src='images/i_edit_disable.gif' width='12' height='12' border='0' title='Cannot change status' align='absmiddle'>`
171	brianf	832	`<% End If %>`
161	iaugusti	833	`</td>`
		834	`<td bgcolor=#f5f5f5 class="sublbox_txt"><%=sstate%></td>`
		835	`</tr>`
		836
		837	`<tr>`
		838	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Deployable:</b></td>`
5533	dpurdie	839	`<td bgcolor=#f5f5f5 class="sublbox_txt"><%=iif(IsNull( rsQry("is_deployable") ), "No","Yes")%></td>`
121	hknight	840	`</tr>`
129	ghuddy	841
161	iaugusti	842	`<tr>`
		843	`<td width="1%" nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Short Description:</b></td>`
6626	dpurdie	844	`<td witdh="100%" bgcolor=#f5f5f5 class="sublbox_txt clip">`
161	iaugusti	845	`<%If IsNull( rsQry("pv_description") ) Then%>`
5596	dpurdie	846	`<span class='err_alert'>Required!</span>`
		847	`<%Else%>`
		848	`<%=NewLine_To_BR ( To_HTML( rsQry("pv_description") ) )%>`
161	iaugusti	849	`<%End If%>`
		850	`</td>`
		851	`</tr>`
		852	`<tr>`
		853	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Package Overview:</b> </td>`
6626	dpurdie	854	`<td bgcolor=#f5f5f5 class="sublbox_txt clip">`
161	iaugusti	855	`<%If IsNull( rsQry("pv_overview") ) Then%>`
5596	dpurdie	856	`<span class='err_alert'>Required!</span>`
		857	`<%Else%>`
		858	`<%=NewLine_To_BR ( To_HTML( rsQry("pv_overview") ) )%>`
161	iaugusti	859	`<%End If%>`
		860	`</td>`
		861	`</tr>`
5338	dpurdie	862	`<!-- Package Licence information -->`
5980	dpurdie	863	`<%`
		864	`Dim sonclick`
6642	dpurdie	865	`Dim imgClass`
		866	`Dim sClass`
5980	dpurdie	867	`%>`
5338	dpurdie	868	`<tr>`
5980	dpurdie	869	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">`
6827	dpurdie	870	`<%BuildEditButtonRaw canActionControlInProject ("EditPackageLicence") OR canActionControl("MSMaintainer"), _`
		871	`"Package Licence:", "Edit", False, "src='images/i_edit.gif' width='12' height='12' border='0' align='absmiddle'",_`
		872	`"MM_openVixIFrame('_wform_change_licence.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change License')" %>`
5980	dpurdie	873	`</td>`
5338	dpurdie	874	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
		875	`<%=getLicence()%>`
		876	`</td>`
		877	`</tr>`
6827	dpurdie	878	`<!-- Build Owner -->`
6642	dpurdie	879	`<tr class="sublbox_txt" >`
		880	`<td nowrap bgcolor=#e4e9ec valign="top">`
6827	dpurdie	881	`<%BuildEditButtonRaw objAccessControl.UserLogedIn() AND NOT pkgInfoHash.Item("is_sdkpkg"),_`
		882	`"Build Owner:", "Edit", False, "src='images/i_edit.gif' width='12' height='12' border='0' align='absmiddle'",_`
		883	`"MM_openVixIFrame('_wform_change_owner.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change Owner')" %>`
6642	dpurdie	884	`<%=Quick_Help("BuildOwner")%>`
161	iaugusti	885	`</td>`
6642	dpurdie	886	`<td bgcolor=#f5f5f5><%=emailField(pkgInfoHash.Item ("owner"),pkgInfoHash.Item ("owner_email"))%></td>`
161	iaugusti	887	`</tr>`
		888
		889	`<%`
		890	`' Created:`
		891	`%>`
		892	`<tr>`
		893	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Created:</b></td>`
6610	dpurdie	894	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
		895	`<%=DisplayDate(pkgInfoHash.Item ("created_stamp"))&" by "& emailField(pkgInfoHash.Item ("creator"),pkgInfoHash.Item ("creator_email"))%>`
161	iaugusti	896	`</td>`
		897	`</tr>`
		898
		899	`<%`
		900	`' Last Modified:`
		901	`%>`
		902	`<tr>`
		903	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Last Modified:</b></td>`
		904	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
6610	dpurdie	905	`<%=DisplayDateTimeSecs(pkgInfoHash.Item ("modified_stamp"))&" by "& emailField(pkgInfoHash.Item ("modifier"),pkgInfoHash.Item ("modifier_email"))%>`
161	iaugusti	906	`</td>`
		907	`</tr>`
		908
		909	`<%`
		910	`' Added to Release`
		911	`If IsNull(pkgInfoHash.Item ("is_patch")) AND (Request("rtag_id") <> "") AND (pkgInfoHash.Item ("insertor") <> "") Then`
		912	`%>`
		913	`<tr>`
		914	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Added to Release:</b></td>`
		915	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
6610	dpurdie	916	`<%=DisplayDate(pkgInfoHash.Item ("insert_stamp")) &" by "& emailField(pkgInfoHash.Item ("insertor"),pkgInfoHash.Item ("insertor_email"))%>`
161	iaugusti	917	`</td>`
		918	`</tr>`
		919	`<%End If%>`
		920
139	ghuddy	921	`<%If (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CLEARCASE_TAG) OR (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CVS_TAG) Then%>`
129	ghuddy	922	`<tr>`
161	iaugusti	923	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Version Control System:</b></td>`
		924	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
129	ghuddy	925	`<%=NewLine_To_BR ( To_HTML( vcsInfoCollector.Item("vcs_name") ) )%>`
5596	dpurdie	926	`<%If (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CVS_TAG) AND pkgInfoHash.Item ("build_type") = "A" Then%>`
		927	`<span class='err_alert'>[Requires Manual Build]</span>`
		928	`<%End If%>`
		929	`<td>`
129	ghuddy	930	`</tr>`
1376	dpurdie	931
129	ghuddy	932	`<tr>`
1376	dpurdie	933	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Source Path:</b> </td>`
161	iaugusti	934	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
1376	dpurdie	935	`<%If IsNull( rsQry("src_path") ) Then%>`
		936	`<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("src_path") ) )%>`
129	ghuddy	937	`<%End If%>`
		938	`</td>`
		939	`</tr>`
1376	dpurdie	940
129	ghuddy	941	`<tr>`
1376	dpurdie	942	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Label:</b></td>`
161	iaugusti	943	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
1376	dpurdie	944	`<%If IsNull( rsQry("pkg_label") ) Then%>`
		945	`<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("pkg_label") ) )%>`
129	ghuddy	946	`<%End If%>`
		947	`</td>`
		948	`</tr>`
		949	`<%ElseIf vcsInfoCollector.Item("vcs_tag") = enum_VCS_SUBVERSION_TAG Then%>`
		950	`<tr>`
161	iaugusti	951	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Version Control System:</b></td>`
		952	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
129	ghuddy	953	`<%=NewLine_To_BR ( To_HTML( vcsInfoCollector.Item("vcs_name") ) )%>`
		954	`</td>`
		955	`</tr>`
1376	dpurdie	956
129	ghuddy	957	`<tr>`
1376	dpurdie	958	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Source Path:</b> </td>`
6121	dpurdie	959	`<td bgcolor=#f5f5f5 class="sublbox_txt clip">`
129	ghuddy	960	`<%If IsNull( rsQry("src_path") ) Then%>`
		961	`<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("src_path") ) )%>`
		962	`<%End If%>`
		963	`</td>`
		964	`</tr>`
1376	dpurdie	965
183	brianf	966	`<tr>`
1376	dpurdie	967	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Tag:</b></td>`
6121	dpurdie	968	`<td bgcolor=#f5f5f5 class="sublbox_txt clip">`
191	brianf	969	`<%If IsNull( rsQry("pkg_label") ) Then%>`
		970	`<span class='err_alert'>Required!</span><%Else%><%=NewLine_To_BR ( To_HTML( rsQry("pkg_label") ) )%>`
		971	`<%End If%>`
183	brianf	972	`</td>`
		973	`</tr>`
1376	dpurdie	974
129	ghuddy	975	`<%ElseIf vcsInfoCollector.Item("vcs_tag") = enum_VCS_UNCONTROLLED_TAG Then%>`
		976	`<tr>`
161	iaugusti	977	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Version Control System:</b></td>`
		978	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
129	ghuddy	979	`<%=NewLine_To_BR ( To_HTML( vcsInfoCollector.Item("vcs_name") ) )%>`
		980	`</td>`
		981	`</tr>`
		982	`<%Else%>`
		983	`<tr>`
161	iaugusti	984	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Version Control System:</b></td>`
		985	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
129	ghuddy	986	`<span class='err_alert'>Required!</span>`
		987	`</td>`
		988	`</tr>`
		989	`<%End If%>`
		990
121	hknight	991	`<tr>`
6579	dpurdie	992	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">`
6827	dpurdie	993	`<%BuildEditButtonRaw (pkgInfoHash.Item("can_edit_in_project") = "1") AND (objAccessControl.UserLogedIn) AND (canActionInProject()) AND pkgInfoHash.Item("base_view_id") <> "",_`
		994	`"Base View:", "Edit", False, "src='images/i_edit.gif' width='12' height='12' border='0' align='absmiddle'",_`
		995	`"MM_openVixIFrame('_wform_change_group.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Set Package Base View')" %>`
6579	dpurdie	996	`</td>`
6121	dpurdie	997	`<td bgcolor=#f5f5f5 class="sublbox_txt clip">`
6642	dpurdie	998	`<% Dim CleanView : CleanView = pkgInfoHash.Item("view_name")`
		999	`If CleanView = "" Then CleanView = "N/A"`
		1000	`Response.Write CleanView`
		1001	`%>`
121	hknight	1002	`</td>`
		1003	`</tr>`
161	iaugusti	1004
121	hknight	1005	`<tr>`
5266	dpurdie	1006	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Following:</b><%=Quick_Help("following")%></td>`
		1007	`<td bgcolor=#f5f5f5 class="sublbox_txt"><%=GetFollowing()%></td>`
		1008	`</tr>`
		1009
		1010	`<tr>`
161	iaugusti	1011	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">`
123	ghuddy	1012	`<b>Build Standard:</b>`
121	hknight	1013	`</td>`
		1014	`<%`
		1015	`If pkgInfoHash.Item ("bs_id") <> "" Then`
		1016	`If pkgInfoHash.Item ("bs_id") = "1" Then`
161	iaugusti	1017	`Response.write "<td bgcolor=#f5f5f5 class='sublbox_txt'>JATS<br></td>"`
119	ghuddy	1018
121	hknight	1019	`ElseIf pkgInfoHash.Item ("bs_id") = "2" Then`
161	iaugusti	1020	`Response.write "<td bgcolor=#f5f5f5 class='sublbox_txt'>ANT<br></td>"`
119	ghuddy	1021
121	hknight	1022	`ElseIf pkgInfoHash.Item ("bs_id") = "3" Then`
5596	dpurdie	1023	`Response.write "<td bgcolor=#f5f5f5 class='sublbox_txt'>NONE"`
		1024	`If pkgInfoHash.Item("build_type") = "A" Then`
		1025	`Response.write "<span class='err_alert'> [Must be specified for an automated build]</span>"`
		1026	`End If`
		1027	`Response.write "<br></td>"`
121	hknight	1028	`End If`
		1029	`Else`
129	ghuddy	1030	`If vcsInfoCollector.Item("vcs_tag") <> enum_VCS_UNCONTROLLED_TAG Then`
161	iaugusti	1031	`Response.write "<td bgcolor=#f5f5f5 class='sublbox_txt'><span class='err_alert'>Required!</span><br></td>"`
129	ghuddy	1032	`Else`
161	iaugusti	1033	`Response.write "<td bgcolor=#f5f5f5 class='sublbox_txt'>Unspecified<br></td>"`
129	ghuddy	1034	`End If`
121	hknight	1035	`End If`
		1036	`%>`
		1037	`</tr>`
129	ghuddy	1038	`<%If (NOT IsNull(pkgInfoHash.Item ("bs_id"))) AND (pkgInfoHash.Item ("bs_id") <> "3") Then%>`
		1039	`<tr>`
161	iaugusti	1040	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Build Environment:</b> </td>`
129	ghuddy	1041	`<%`
		1042	`'--- Get Build Env Details`
		1043	`Set rsTemp = OraDatabase.DbCreateDynaset( SQL_Build_Env ( parPv_id ), cint(0))`
		1044	`%>`
161	iaugusti	1045	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
129	ghuddy	1046	`<%If rsTemp.RecordCount = 0 Then%>`
		1047	`<%If rsQry("is_build_env_required") = enumDB_NO Then%>`
		1048	`Not Required`
		1049	`<%Else%>`
		1050	`<span class='err_alert'>Required!</span>`
		1051	`<%End If%>`
		1052	`<%Else%>`
		1053	`<%If (IsNull( rsQry("is_build_env_required") ) AND (rsQry("comments") <> "Rippled Build.")) Then%>`
		1054	`<span class='err_alert'>Required!</span>`
		1055	`<%ElseIf rsQry("is_build_env_required") = enumDB_NO Then%>`
		1056	`Not Required.`
		1057	`<%Else%>`
1376	dpurdie	1058	`<table width="40%" border="0" cellspacing="0" cellpadding="1">`
129	ghuddy	1059	`<%`
		1060	`currG1 = 0`
		1061	`While (NOT rsTemp.BOF) AND (NOT rsTemp.EOF)`
4134	dpurdie	1062	`If currG1 <> CInt(rsTemp("bm_id")) Then%>`
129	ghuddy	1063	`<tr>`
1376	dpurdie	1064	`<td colspan="2" nowrap class="sublbox_txt">`
4134	dpurdie	1065	`<%=rsTemp("bm_name")%> <%=GetBuildType( rsTemp("bsa_id"),rsTemp("bsa_name") )%>`
129	ghuddy	1066	`</td>`
		1067	`</tr>`
		1068	`<%currG1 = CInt(rsTemp("bm_id"))`
		1069	`End If`
		1070	`rsTemp.MoveNext`
		1071	`WEnd`
		1072	`%>`
		1073	`</table>`
		1074	`<%End If%>`
121	hknight	1075	`<%End If%>`
129	ghuddy	1076	`</td>`
		1077	`</tr>`
		1078	`<%End If%>`
		1079
2735	dpurdie	1080	`<%`
		1081	`' Get JATS extraction commands`
		1082	`Dim sjats_cmd_test, sjats_cmds_qh, sjats_extractable`
		1083	`ReDim sjats_cmds(6)`
		1084	`call Jats_Extract_Command(sjats_cmds, sjats_cmd_test, sjats_cmds_qh, sjats_extractable)`
6497	dpurdie	1085	`Dim PrevVerTitle : PrevVerTitle = "Previous Version:"`
2735	dpurdie	1086
6480	dpurdie	1087	`' Previous Versions`
6827	dpurdie	1088	`If pkgInfoHash.Item ("pkg_count") = 1 AND pkgInfoHash.Item ("dlocked") = "N" Then`
6497	dpurdie	1089	`Call DisplayVersionRow(NULL, PrevVerTitle, "PreviousVcsTag")`
		1090	`Call DisplayCreationCommands()`
6480	dpurdie	1091
6497	dpurdie	1092	`ElseIf IsNull(pkgInfoHash.Item ("is_patch")) Then`
		1093
6480	dpurdie	1094	`If canActionControlInProject("ChangePreviousVersion") AND NOT pkgInfoHash.Item("is_sdkpkg") Then`
5590	dpurdie	1095	`sonclick="MM_openVixIFrame('_wform_change_previous_version.asp?rfile="& scriptName &"&pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change Previous Version')"`
6642	dpurdie	1096	`PrevVerTitle = "<a href='javascript:;' onClick=""" & sonclick & """ class='sublbox_txt'> " & PrevVerTitle & " <img src='images/i_edit.gif' width='12' height='12' border='0' align='absmiddle'></a>"`
6480	dpurdie	1097	`Else`
6642	dpurdie	1098	`PrevVerTitle = PrevVerTitle & "<img src='images/i_edit_disable.gif' width='12' height='12' border='0' align='absmiddle'>"`
6480	dpurdie	1099	`End If`
		1100	`Call DisplayVersionRow(pkgInfoHash.Item ("last_pv_id"), PrevVerTitle, "PreviousVcsTag")`
129	ghuddy	1101
6480	dpurdie	1102	`Dim iLastSignificantPVID`
		1103	`Dim iRippleBasePVID`
		1104	`Call getLastSignificantVersions(pkgInfoHash.Item("pv_id"), iRippleBasePVID, iLastSignificantPVID)`
129	ghuddy	1105
6480	dpurdie	1106	`Call DisplayVersionRow(iRippleBasePVID, "Previous NonRipple Version:", "PreviousNonRippleVcsTag")`
		1107	`Call DisplayVersionRow(iLastSignificantPVID, "Previous Significant Version:", "PreviousSignificantVcsTag")`
		1108	`End If`
161	iaugusti	1109	`%>`
		1110	`<tr>`
1376	dpurdie	1111	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt" valign="top">`
		1112	`<strong>JATS extraction commands:</strong>`
		1113	`<%=Quick_Help ( "JatsExtraction_" & sjats_cmds_qh )%>`
161	iaugusti	1114	`</td>`
6121	dpurdie	1115	`<td style="padding: 0px;">`
		1116	`<table class="full_table">`
1376	dpurdie	1117	`<% Dim ii : For ii = 0 to UBound(sjats_cmds) %>`
6121	dpurdie	1118	`<tr><td bgcolor=#f5f5f5 class="sublbox_txt clip">`
1376	dpurdie	1119	`<%=NewLine_To_BR ( To_HTML(sjats_cmds(ii)) )%>`
		1120	`</td>`
		1121	`<% Next %>`
161	iaugusti	1122	`</td>`
1376	dpurdie	1123	`</tr>`
		1124	`</table>`
161	iaugusti	1125	`</tr>`
		1126	`<tr>`
		1127	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
1376	dpurdie	1128	`<strong>JATS Test:</strong><%=Quick_Help ( "JatsTest" )%>`
161	iaugusti	1129	`</td>`
6121	dpurdie	1130	`<td bgcolor=#f5f5f5 class="sublbox_txt clip">`
161	iaugusti	1131	`<%=NewLine_To_BR ( To_HTML(sjats_cmd_test) )%>`
		1132	`</td>`
		1133	`</tr>`
129	ghuddy	1134
161	iaugusti	1135	`<%`
1376	dpurdie	1136	`' Beyond Compare difference command`
		1137	`Dim prevVcsTag`
		1138	`Dim curVcsTag`
6497	dpurdie	1139	`Dim sBcCmd, sBcClass`
1376	dpurdie	1140
		1141	`prevVcsTag = Get_Pkg_Vcs_Tag(iLastSignificantPVID)`
		1142	`curVcsTag = Get_Pkg_Vcs_Tag(parPv_id)`
		1143	`sBcCmd = ""`
6497	dpurdie	1144	`sBcClass = ""`
1376	dpurdie	1145
6497	dpurdie	1146	`If pkgInfoHash.Item ("pkg_count") = 1 Then`
		1147	`sBcCmd = "No prior version compare against"`
		1148	`ElseIf (IsNull(prevVcsTag) OR prevVcsTag = "" ) Then`
1376	dpurdie	1149	`sBcCmd = "No prior label to compare against"`
		1150	`ElseIf (IsNull(curVcsTag) OR curVcsTag = "" ) Then`
		1151	`sBcCmd = "Current VCS tag not yet specified"`
2735	dpurdie	1152	`ElseIf (not sjats_extractable) Then`
		1153	`sBcCmd = "Cannot be extracted with JATS"`
1376	dpurdie	1154	`Else`
		1155	`sBcCmd = "jats vcsdiff -old=" & prevVcsTag & " -new=" & curVcsTag`
6497	dpurdie	1156	`sBcClass = "clip"`
1376	dpurdie	1157	`End If`
		1158	`sBcCmd = NewLine_To_BR( To_HTML (sBcCmd) )`
		1159
		1160	`' Codestriker commands - Only for ClearCase`
6121	dpurdie	1161	`Dim sCsCmd, sCsClass`
161	iaugusti	1162	`sCsCmd = ""`
6121	dpurdie	1163	`sCsClass = ""`
1376	dpurdie	1164
161	iaugusti	1165	`If vcsInfoCollector.Item("vcs_tag") = enum_VCS_CLEARCASE_TAG Then`
1376	dpurdie	1166	`Dim oldLabel`
		1167	`Dim old_vcs_tag`
161	iaugusti	1168	`If (pv_id_exists(iLastSignificantPVID) = TRUE) Then`
		1169	`old_vcs_tag = get_vcs_tag(iLastSignificantPVID)`
		1170	`If (old_vcs_tag = enum_VCS_CLEARCASE_TAG) Then`
		1171	`oldLabel = get_Pkg_Label(iLastSignificantPVID)`
1376	dpurdie	1172	`sCsCmd = NewLine_To_BR ( To_HTML( Codestriker_Command (oldLabel, pkgInfoHash.Item("pkg_label")) ) )`
6121	dpurdie	1173	`sCsClass = "clip"`
161	iaugusti	1174	`End If`
129	ghuddy	1175	`End If`
		1176	`End If%>`
161	iaugusti	1177
		1178	`<tr>`
		1179	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
		1180	`<strong>Codestriker command:</strong><%=Quick_Help ( "Codestriker" )%>`
		1181	`</td>`
6121	dpurdie	1182	`<td bgcolor=#f5f5f5 class="sublbox_txt <%=sCsClass%>">`
161	iaugusti	1183	`<%=sCsCmd%>`
		1184	`</td>`
		1185	`</tr>`
		1186	`<tr>`
		1187	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
		1188	`<strong>Beyond Compare command:</strong><%=Quick_Help ( "BeyondCompare" )%>`
		1189	`</td>`
6497	dpurdie	1190	`<td bgcolor=#f5f5f5 class="sublbox_txt <%=sBcClass%>">`
161	iaugusti	1191	`<%=sBcCmd%>`
		1192	`</td>`
		1193	`</tr>`
		1194
119	ghuddy	1195
121	hknight	1196	`<%If pkgInfoHash.Item("is_deployable") = "Y" Then`
		1197	`OraDatabase.Parameters.Add "PV_ID", pkgInfoHash.Item ("pv_id"), ORAPARM_INPUT, ORATYPE_NUMBER`
		1198	`Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("DeploymentManagerReference.sql"), cint(0))`
		1199	`If rsTemp.RecordCount = 0 Then%>`
		1200	`<tr>`
161	iaugusti	1201	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>SBOM Information:</b></td>`
121	hknight	1202	`<%If pkgInfoHash.Item("product_state") = 3 Then%>`
161	iaugusti	1203	`<td bgcolor=#f5f5f5 class="err_alert"><b>Ready For Deployment!</b></td>`
121	hknight	1204	`<%ElseIf pkgInfoHash.Item("product_state") = 2 Then%>`
161	iaugusti	1205	`<td bgcolor=#f5f5f5 class="err_alert"><b>Ready For Testing!</b></td>`
121	hknight	1206	`<%ElseIf pkgInfoHash.Item("product_state") = 1 Then%>`
161	iaugusti	1207	`<td bgcolor=#f5f5f5 class="err_alert"><b>Ready For Integration!</b></td>`
121	hknight	1208	`<%ElseIf pkgInfoHash.Item("product_state") = 5 Then%>`
161	iaugusti	1209	`<td bgcolor=#f5f5f5 class="err_alert"><b>Ready For Integration and Deployment!</b></td>`
121	hknight	1210	`<%ElseIf IsNull(pkgInfoHash.Item("product_state")) Then%>`
161	iaugusti	1211	`<td bgcolor=#f5f5f5 class="err_alert"><b>Information Unavailable!</b></td>`
121	hknight	1212	`<%End If%>`
119	ghuddy	1213
		1214	`</tr>`
121	hknight	1215	`<%Else%>`
119	ghuddy	1216	`<tr>`
161	iaugusti	1217	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>SBOM Added/Updated:</b></td>`
		1218	`<td bgcolor=#f5f5f5 class="sublbox_txt">`
121	hknight	1219	`<%=rsTemp("branch_name")%> - <%=rsTemp("bom_name")%><%=VBNewLine%><%=rsTemp("version")%>`
		1220	`</td>`
119	ghuddy	1221	`</tr>`
121	hknight	1222	`<%End If`
		1223	`rsTemp.Close()`
		1224	`Set rsTemp = Nothing`
		1225	`OraDatabase.Parameters.Remove "PV_ID"`
		1226	`End If`
		1227	`%>`
		1228	`</table>`
161	iaugusti	1229	`</fieldset>`
121	hknight	1230	`<br>`
1376	dpurdie	1231
121	hknight	1232	`<!-- PACKAGE METRICS -------------------------------------------------------------------------------------------------------------------->`
5383	dpurdie	1233	`<%`
		1234	`Call GetPackageMetrics( parPv_id, rsPkgMetrics )`
		1235	`%>`
6324	dpurdie	1236	`<fieldset class="fset" onclick="ToggleDisplay('divPkgMetrics','pkg_metrics_filler')">`
5526	dpurdie	1237	`<%If IsNull(rsPkgMetrics("pkg_name")) Then %>`
5383	dpurdie	1238	`<legend class="body_colb">`
6827	dpurdie	1239	`<img src="images/i_metrics.gif" width="20" height="24" hspace="4" border="0" align='absmiddle' >Package Metrics not available`
6324	dpurdie	1240	`</legend>`
5526	dpurdie	1241	`<%Else%>`
		1242	`<legend class="body_colb">`
6827	dpurdie	1243	`<img src="images/i_metrics.gif" width="20" height="24" hspace="4" border="0" align='absmiddle' >Package Metrics...`
6324	dpurdie	1244	`</legend>`
5383	dpurdie	1245	`<div name="pkg_metrics_filler" id="pkg_metrics_filler" style="display:block;" class="div_filler">`
6827	dpurdie	1246	`<span class="txt_linked pointer">Show...</span>`
5383	dpurdie	1247	`</div>`
		1248	`<div name="divPkgMetrics" id="divPkgMetrics" style="display:none;">`
		1249	`<a name="PACKAGE_METRICS"></a>`
		1250	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1251	`<tr>`
		1252	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" width="20%"><b>Autobuilt:</b></td>`
		1253	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%If rsPkgMetrics("is_autobuildable") = "Y" Then%>Yes<%Else%>No<%End If%></td>`
		1254	`</tr>`
		1255	`<tr>`
		1256	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Unit Tested:</b></td>`
		1257	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%If rsPkgMetrics("unit_tested") = "Y" Then%>Yes<%Else%>No<%End If%></td>`
		1258	`</tr>`
		1259	`<tr>`
		1260	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Autotested:</b></td>`
		1261	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%If rsPkgMetrics("autotested") = "Y" Then%>Yes<%Else%>No<%End If%></td>`
		1262	`</tr>`
		1263	`<%If NOT IsNull(rsPkgMetrics("code_lines")) Then%>`
		1264	`<tr>`
		1265	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Code Lines:</b></td>`
		1266	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("code_lines")%></td>`
		1267	`</tr>`
		1268	`<%End If%>`
		1269	`<%If NOT IsNull(rsPkgMetrics("comment_lines")) Then%>`
		1270	`<tr>`
		1271	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Comment Lines:</b></td>`
		1272	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("comment_lines")%></td>`
		1273	`</tr>`
		1274	`<%End If%>`
		1275	`<%If NOT IsNull(rsPkgMetrics("blank_lines")) Then%>`
		1276	`<tr>`
		1277	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Blank Lines:</b></td>`
		1278	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("blank_lines")%></td>`
		1279	`</tr>`
		1280	`<%End If%>`
		1281	`<%If NOT IsNull(rsPkgMetrics("branches")) Then%>`
		1282	`<tr>`
		1283	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Number of Branches:</b></td>`
		1284	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("branches")%></td>`
		1285	`</tr>`
		1286	`<%End If%>`
		1287	`<%If NOT IsNull(rsPkgMetrics("branch_list")) Then%>`
		1288	`<tr>`
		1289	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Branch List:</b></td>`
		1290	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("branch_list")%></td>`
		1291	`</tr>`
		1292	`<%End If%>`
		1293	`<%If NOT IsNull(rsPkgMetrics("code_files")) Then%>`
		1294	`<tr>`
		1295	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Code Files:</b></td>`
		1296	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("code_files")%></td>`
		1297	`</tr>`
		1298	`<%End If%>`
		1299	`<%If NOT IsNull(rsPkgMetrics("ignored_files")) Then%>`
		1300	`<tr>`
		1301	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Ignored Files:</b></td>`
		1302	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("ignored_files")%></td>`
		1303	`</tr>`
		1304	`<%End If%>`
		1305	`<%If NOT IsNull(rsPkgMetrics("makefiles")) Then%>`
		1306	`<tr>`
		1307	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Makefiles:</b></td>`
		1308	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("makefiles")%></td>`
		1309	`</tr>`
		1310	`<%End If%>`
		1311	`<%If NOT IsNull(rsPkgMetrics("total_files")) Then%>`
		1312	`<tr>`
		1313	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Total Files:</b></td>`
		1314	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("total_files")%></td>`
		1315	`</tr>`
		1316	`<%End If%>`
		1317	`<%If NOT IsNull(rsPkgMetrics("directories")) Then%>`
		1318	`<tr>`
		1319	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Number of Directories:</b></td>`
		1320	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("directories")%></td>`
		1321	`</tr>`
		1322	`<%End If%>`
		1323	`<%If NOT IsNull(rsPkgMetrics("directory_depth")) Then%>`
		1324	`<tr>`
		1325	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Directory Depth:</b></td>`
		1326	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("directory_depth")%></td>`
		1327	`</tr>`
		1328	`<%End If%>`
		1329	`<%If NOT IsNull(rsPkgMetrics("created_stamp")) Then%>`
		1330	`<tr>`
		1331	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Metrics Collected:</b></td>`
		1332	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("created_stamp")%></td>`
		1333	`</tr>`
		1334	`<%End If%>`
5632	dpurdie	1335	`<%If NOT IsNull(rsPkgMetrics("build_time")) Then%>`
		1336	`<tr>`
		1337	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt"><b>Build Time:</b></td>`
		1338	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsPkgMetrics("build_time")%> Seconds</td>`
		1339	`</tr>`
		1340	`<%End If%>`
		1341
5383	dpurdie	1342	`</table>`
		1343	`</div>`
5526	dpurdie	1344	`<%End If%>`
5383	dpurdie	1345	`</fieldset>`
		1346	`<br>`
		1347	`<%`
		1348	`rsPkgMetrics.Close()`
		1349	`Set rsPkgMetrics = nothing`
		1350	`%>`
121	hknight	1351	`<!-- PRODUCTS AFFECTED BY CHANGE -------------------------------------------------------------------------------------------------------->`
119	ghuddy	1352
		1353	`<!-- REASON FOR DEPRECATION/DEPENDANCY DEPRECATED ----------------------------------------------------------------------------------------------------------------->`
121	hknight	1354	`<%If pkgInfoHash.Item("deprecated_state") = 6 Then %>`
119	ghuddy	1355
121	hknight	1356	`<fieldset class="fset"><legend class="body_colb"><img src='images/s_notes.gif' width='21' height='24' hspace='4' border='0' align='absmiddle'>Reason for deprecation</legend>`
		1357	`<a name="REASON_FOR_DEPRECATION"></a>`
		1358	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1359	`<tr>`
161	iaugusti	1360	`<td bgcolor=#f5f5f5>`
119	ghuddy	1361
121	hknight	1362	`<%`
		1363	`Dim rsComment`
		1364	`Set rsComment = OraDatabase.DbCreateDynaset("SELECT * FROM DEPRECATED_PACKAGES WHERE RTAG_ID ="& Request("rtag_id") &" AND PKG_ID = "& pkgInfoHash.Item ("pkg_id") &"", cint(0))`
		1365	`If rsComment("comments") <> "" Then`
		1366	`Response.write "<table border='0' cellspacing='0' cellpadding='0'>"`
		1367	`Response.write "<tr>"`
		1368	`Response.write "<td class='sublbox_txt'>"& NewLine_To_BR(( rsComment("comments") ) ) &"<br></td>"`
		1369	`Response.write "</tr>"`
		1370	`Response.write "</table>"`
		1371	`'Else`
		1372	`' If FixedIssues ( parPv_id ) Then`
		1373	`' Response.write "<span class='sublbox_txt'>Not specified.</span><br>"`
		1374	`' Else`
		1375	`' Response.write "<span class='err_alert'>Required!</span><br>"`
		1376	`' End If`
		1377	`End If`
		1378	`rsComment.Close()`
		1379	`Set rsComment = nothing`
		1380	`%>`
		1381	`</td>`
		1382	`</tr>`
		1383	`</table>`
		1384	`</fieldset>`
4230	dpurdie	1385	`<br>`
121	hknight	1386	`<%End If%>`
119	ghuddy	1387	`<!-- SBOM PRIORITY/CRITICALITY --------------------------------------------------------------------------------------------------------->`
121	hknight	1388	`<%If NOT pageIsEditable AND pkgInfoHash.Item ("is_deployable") = "Y" Then%>`
6324	dpurdie	1389	`<fieldset class="fset">`
		1390	`<legend class="body_colb"><img src='icons/i_prod_sbom_priority.gif' hspace='4' border='0' align='absmiddle'>SBOM Priority</legend>`
		1391	`<%If (pkgInfoHash.Item ("dlocked") = "Y") Then%>`
		1392	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
6827	dpurdie	1393	`<span onClick="MM_openVixIFrame('_wform_sbom_priority.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','SBOM Priority')" class="pointer txt_linked">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
6324	dpurdie	1394	`</div>`
		1395	`<%End If%>`
121	hknight	1396	`<a name="SBOM_PRIORITY"></a>`
		1397	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1398	`<tr>`
161	iaugusti	1399	`<td bgcolor=#f5f5f5>`
121	hknight	1400	`<%If pkgInfoHash.Item ("sbom_priority") <> "" Then%>`
		1401	`<table border='0' cellspacing='0' cellpadding='0'>`
		1402	`<tr>`
		1403	`<td class='sublbox_txt'>`
		1404	`<%`
		1405	`If pkgInfoHash.Item ("sbom_priority") = "C" Then`
		1406	`Response.write "<b><font color='red'>Critical.</font></b>"`
		1407	`ElseIf pkgInfoHash.Item ("sbom_priority") = "I" Then`
		1408	`Response.write "<b>Important.</b>"`
		1409	`ElseIf pkgInfoHash.Item ("sbom_priority") = "R" Then`
		1410	`Response.write "Routine"`
		1411	`ElseIf pkgInfoHash.Item ("sbom_priority") = "L" Then`
		1412	`Response.write "Low"`
		1413	`End If`
		1414	`%>`
		1415	`</td>`
		1416	`</tr>`
		1417	`</table>`
		1418	`<%Else%>`
		1419	`<span class='err_alert'>Required!</span><br>`
		1420	`<%End If%>`
		1421	`</td>`
		1422	`</tr>`
		1423	`</table>`
		1424	`</fieldset>`
4230	dpurdie	1425	`<br>`
121	hknight	1426	`<%End If%>`
119	ghuddy	1427	`<!-- CHANGE TYPE ----------------------------------------------------------------------------------------------------------------------->`
4230	dpurdie	1428	`<fieldset class="fset">`
		1429	`<a name="CHANGE_TYPE"></a>`
121	hknight	1430	`<%If pkgInfoHash.Item ("build_type") = "A" Then%>`
4218	dpurdie	1431	`<legend class="body_colb"><img src='icons/i_pkg_change_type.gif' hspace='4' border='0' align='absmiddle'>Change Type</legend>`
6324	dpurdie	1432	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
		1433	`<%If (pkgInfoHash.Item ("dlocked") <> "A") AND (pkgInfoHash.Item ("dlocked") <> "Y") AND criticalSectionIsEditable Then%>`
6827	dpurdie	1434	`<span onClick="MM_openVixIFrame('_wform_rename_version.asp?renameMode=2&rfile=<%=ScriptName%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Change Ripple Type')" class="txt_linked pointer">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
6324	dpurdie	1435	`<%End If%>`
		1436	`</div>`
121	hknight	1437	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1438	`<tr>`
161	iaugusti	1439	`<td bgcolor=#f5f5f5>`
121	hknight	1440	`<%`
		1441	`If pkgInfoHash.Item ("change_type") <> "" Then`
		1442	`Response.write "<table border='0' cellspacing='0' cellpadding='0'>"`
		1443	`Response.write "<tr>"`
		1444	`If pkgInfoHash.Item ("change_type") = "M" Then`
		1445	`Response.write "<td class='sublbox_txt'>Major Change.<br></td>"`
		1446	`ElseIf pkgInfoHash.Item ("change_type") = "N" Then`
		1447	`Response.write "<td class='sublbox_txt'>Minor Change.<br></td>"`
		1448	`ElseIf pkgInfoHash.Item ("change_type") = "P" Then`
		1449	`Response.write "<td class='sublbox_txt'>Patch Change.<br></td>"`
4230	dpurdie	1450	`ElseIf pkgInfoHash.Item ("change_type") = "F" Then`
		1451	`Response.write "<td class='sublbox_txt'>Version Specified by User.<br></td>"`
		1452	`Else`
		1453	`Response.write "<td><span class='err_alert'>Unknown Change Type: " & pkgInfoHash.Item ("change_type") & "</span></td>"`
121	hknight	1454	`End If`
		1455	`Response.write "</tr>"`
		1456	`Response.write "</table>"`
		1457	`Else`
		1458	`Response.write "<span class='err_alert'>Required!</span><br>"`
		1459	`End If`
		1460	`%>`
		1461	`</td>`
		1462	`</tr>`
		1463	`</table>`
4230	dpurdie	1464	`<%ElseIf pkgInfoHash.Item ("build_type") = "M" Then%>`
		1465	`<legend class="body_colb"><img src='icons/i_pkg_change_type.gif' hspace='4' border='0' align='absmiddle'>Build Type</legend>`
		1466	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1467	`<tr>`
		1468	`<td bgcolor=#f5f5f5>`
		1469	`<span class='sublbox_txt'>Manually Built Package.</span>`
		1470	`<%If pkgInfoHash.Item ("change_type") <> "F" Then%>`
		1471	`<span class='err_alert'>Unexpected Change Type: <%=pkgInfoHash.Item ("change_type")%></span>`
		1472	`<%End If%>`
		1473	`</td>`
		1474	`</tr>`
		1475	`</table>`
5898	dpurdie	1476	`<%ElseIf pkgInfoHash.Item ("build_type") = "U" Then%>`
		1477	`<legend class="body_colb"><img src='icons/i_pkg_change_type.gif' hspace='4' border='0' align='absmiddle'>Build Type</legend>`
		1478	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1479	`<tr>`
		1480	`<td bgcolor=#f5f5f5>`
		1481	`<span class='sublbox_txt'><span class='err_alert'>UnbuildablePackage.</span> This version has been created outside of the build system, possibly via Deployment Manager</span>`
		1482	`</td>`
		1483	`</tr>`
		1484	`</table>`
4230	dpurdie	1485	`<%ElseIf pkgInfoHash.Item ("build_type") = "Y" Then%>`
		1486	`<legend class="body_colb"><img src='icons/i_pkg_change_type.gif' hspace='4' border='0' align='absmiddle'>Build Type</legend>`
		1487	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1488	`<tr>`
		1489	`<td bgcolor=#f5f5f5>`
4254	dpurdie	1490	`<span class='sublbox_txt'>Ripple Built</span>`
4230	dpurdie	1491	`</td>`
		1492	`</tr>`
		1493	`</table>`
		1494	`<%Else%>`
		1495	`<legend class="body_colb"><img src='icons/i_pkg_change_type.gif' hspace='4' border='0' align='absmiddle'>Build Type</legend>`
		1496	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1497	`<tr>`
		1498	`<td bgcolor=#f5f5f5>`
		1499	`<span class='err_alert'>Unknown Build Type (<%=pkgInfoHash.Item ("build_type")%>) Change Type (<%=pkgInfoHash.Item ("change_type")%>)</span>`
		1500	`</td>`
		1501	`</tr>`
		1502	`</table>`
121	hknight	1503	`<%End If%>`
4230	dpurdie	1504	`</fieldset>`
		1505	`<br>`
131	ghuddy	1506
119	ghuddy	1507	`<!-- RIPPLE PROPERTIES ----------------------------------------------------------------------------------------------------------------------->`
131	ghuddy	1508	`<%If IsNull(pkgInfoHash.Item ("is_patch")) Then%>`
6324	dpurdie	1509	`<fieldset class="fset">`
		1510	`<legend class="body_colb"><img src='icons/i_pkg_ripple_type.gif' hspace='4' border='0' align='absmiddle' height='25' width='25'>Ripple Properties</legend>`
		1511	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
6538	dpurdie	1512	`<%Dim canEditRippleProperties : canEditRippleProperties = FALSE`
6700	dpurdie	1513
		1514	`canEditRippleProperties = (pageIsEditable AND canShowControlInProject( "RipplePackage" )) OR _`
6538	dpurdie	1515	`canShowControlInProject( "AdvRipPackageVersions" ) OR _`
6700	dpurdie	1516	`canShowControlInProject( "PegPackageVersions" ) OR _`
6538	dpurdie	1517	`criticalSectionIsEditable`
		1518
		1519	`If canEditRippleProperties Then%>`
6827	dpurdie	1520	`<span onClick="MM_openVixIFrame('_wform_ripple_properties.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Edit Ripple Type')" class="txt_linked pointer">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
6324	dpurdie	1521	`<%End If%>`
		1522	`</div>`
121	hknight	1523	`<a name="RIPPLE_PROPERTIES"></a>`
		1524	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
131	ghuddy	1525	`<%If Request("rtag_id") <> "" Then`
5098	dpurdie	1526	`If pkgInfoHash.Item ("is_pegged") Then %>`
131	ghuddy	1527	`<tr>`
161	iaugusti	1528	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
131	ghuddy	1529	`<strong>Is Pegged</strong>`
		1530	`<%=Quick_Help ( "pegged_version" )%>`
		1531	`</td>`
161	iaugusti	1532	`<td bgcolor=#f5f5f5 class="sublbox_txt">Yes</td>`
131	ghuddy	1533	`</tr>`
		1534	`<%End If%>`
5098	dpurdie	1535	`<%End If%>`
131	ghuddy	1536
5098	dpurdie	1537	`<%If NOT pkgInfoHash.Item ("is_pegged") Then%>`
6440	dpurdie	1538	`<%If Request("rtag_id") <> "" Then%>`
131	ghuddy	1539	`<tr>`
161	iaugusti	1540	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
131	ghuddy	1541	`<strong>Build Inclusion</strong>`
		1542	`<%=Quick_Help ( "ripple_build" )%>`
		1543	`</td>`
6440	dpurdie	1544	`<%Dim rsQryRipple`
		1545	`Set rsQryRipple = OraDatabase.DbCreateDynaset( "SELECT p.PKG_NAME, pv.PV_OVERVIEW, pv.PKG_ID,nvl(dnr.root_pv_id, -1) as root_pv_id, dnr.* FROM DO_NOT_RIPPLE dnr, PACKAGE_VERSIONS pv, PACKAGES p WHERE dnr.RTAG_ID ="& Request("rtag_id") &"AND dnr.PV_ID ="&Request("pv_id") &" AND pv.pv_id(+) = dnr.ROOT_PV_ID AND p.PKG_ID(+) = pv.PKG_ID", cint(0))`
6370	dpurdie	1546	`If rsQryRipple.RecordCount <> 0 Then`
6440	dpurdie	1547	`Dim CauseText`
		1548	`Dim shref_base`
		1549	`Dim rowData`
		1550	`shref_base = "http://" & archive_server & "/devl/abtlog/"`
		1551	`If (IsNull(rsQryRipple("root_file")) AND IsNull(rsQryRipple("root_cause"))) Then`
		1552	`If rsQryRipple("root_pv_id") < 0 Then`
		1553	`CauseText = "Directly Excluded"`
6370	dpurdie	1554	`Else`
		1555	`CauseText = "Indirectly excluded by <a class=""txt_linked"" title='"&rsQryRipple("PV_OVERVIEW")&"' href=fixed_issues.asp?pv_id="& rsQryRipple("root_pv_id") & "&rtag_id="&rsQryRipple("rtag_id") & ">" & rsQryRipple("pkg_name") & "</a>"`
		1556	`End If`
		1557
		1558	`ElseIf IsNull(rsQryRipple("root_file")) Then`
		1559	`CauseText = rsQryRipple("root_cause")`
		1560
		1561	`Else`
		1562	`CauseText = "<a class=""txt_linked"" title=""" & rsQryRipple("root_file") &_`
		1563	`" Log file may have expired."" " &_`
		1564	`"href=""" & shref_base & rsQryRipple("root_file") & """>" &_`
		1565	`"Build Failure Log File</a>"`
		1566	`End If`
		1567	`%>`
6440	dpurdie	1568	`<td bgcolor=#f5f5f5 class="sublbox_txt">No. <%=CauseText%>`
		1569	`</td>`
		1570	`<%Else%>`
		1571	`<td bgcolor=#f5f5f5 class="sublbox_txt">Yes</td>`
		1572	`<%End If%>`
131	ghuddy	1573	`<%rsQryRipple.Close()`
6440	dpurdie	1574	`Set rsQryRipple = nothing%>`
131	ghuddy	1575	`</tr>`
6440	dpurdie	1576	`<%End If%>`
6642	dpurdie	1577	`<%If pkgInfoHash.Item ("advisory_ripple") Then%>`
		1578	`<tr class="sublbox_txt">`
		1579	`<td width="20%" bgcolor=#e4e9ec>`
		1580	`<strong>Advisory Ripple</strong>`
		1581	`<%=Quick_Help ( "advisory_ripple" )%>`
		1582	`</td>`
		1583	`<td width="80%" bgcolor=#f5f5f5>`
		1584	`Enabled`
		1585	`</td>`
		1586	`</tr>`
		1587	`<%End If%>`
131	ghuddy	1588	`<tr>`
161	iaugusti	1589	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
131	ghuddy	1590	`<strong>Ripple Type</strong>`
		1591	`<%=Quick_Help ( "ripple_type" )%>`
		1592	`</td>`
161	iaugusti	1593	`<td width="80%" bgcolor=#f5f5f5>`
131	ghuddy	1594	`<%`
		1595	`Response.write "<table border='0' cellspacing='0' cellpadding='0'>"`
		1596	`Response.write "<tr>"`
		1597	`Response.write "<td class='sublbox_txt'>"`
5648	dpurdie	1598	`Dim selectedRippleType, selectedRippleName, selectedRippleState`
131	ghuddy	1599	`selectedRippleType = pkgInfoHash.Item ("ripple_field")`
5648	dpurdie	1600	`selectedRippleName = rippleFieldName(selectedRippleType, selectedRippleState)`
		1601	`If NOT selectedRippleState Then`
131	ghuddy	1602	`Response.write "<span class='err_alert'>Required!</span>"`
		1603	`Else`
5648	dpurdie	1604	`Response.write( selectedRippleName )`
131	ghuddy	1605	`End If`
		1606	`If ( selectedRippleType = "L" ) Then`
		1607	`Dim qry`
		1608	`Set qry = OraDatabase.DbCreateDynaset( "SELECT major_limit, minor_limit, patch_limit, build_number_limit from package_versions where pv_id="& Request("pv_id"), cint(0))`
		1609	`Response.write " "`
		1610	`If isNull(qry("major_limit")) Then`
		1611	`Response.write("0")`
		1612	`Else`
		1613	`Response.write( qry.Fields( "major_limit" ).Value )`
		1614	`End If`
		1615	`Response.write ", "`
		1616	`If isNull(qry("minor_limit")) Then`
		1617	`Response.write("0")`
		1618	`Else`
		1619	`Response.write( qry.Fields( "minor_limit" ).Value )`
		1620	`End If`
		1621	`Response.write ", "`
		1622	`If isNull(qry("patch_limit")) Then`
		1623	`Response.write("0")`
		1624	`Else`
		1625	`Response.write( qry.Fields( "patch_limit" ).Value )`
		1626	`End If`
		1627	`Response.write ", "`
		1628	`If isNull(qry("build_number_limit")) Then`
		1629	`Response.write("0")`
		1630	`Else`
		1631	`Response.write( qry.Fields( "build_number_limit" ).Value )`
		1632	`End If`
		1633	`qry.Close()`
		1634	`Set qry = nothing`
		1635	`End If`
5648	dpurdie	1636	`Response.Write "</td>"`
131	ghuddy	1637	`Response.write "</tr>"`
		1638	`Response.write "</table>"`
		1639	`%>`
		1640	`</td>`
		1641	`</tr>`
		1642	`<%End If%>`
6480	dpurdie	1643	`<%If Request("rtag_id") <> "" AND pkgInfoHash.Item("dlocked") = "Y" Then`
6440	dpurdie	1644	`Dim sClickStop, sStopText, dRippleStop, sButtonText, sPersistText`
		1645	`dRippleStop = pkgInfoHash.Item("ripple_stop")`
		1646	`If dRippleStop = "" OR IsNull(dRippleStop) Then`
		1647	`sClickStop="vixConfirm('Marked this package so as to prevent it from being built<br>when its dependencies change, until it is manually resumed.<p>Stop Ripple Builds',{title:'Stop Ripple', button:'Stop', url: '_s_ripple_stop.asp?mode=s&rfile="& scriptName &"&pv_id="& parPv_id &"&rtag_id="& parRtag_id &"'});"`
		1648	`sStopText = "Normal"`
		1649	`sButtonText = "Change"`
		1650	`ElseIf dRippleStop = "s" Then`
		1651	`sClickStop="vixConfirm('This package has been marked to prevented ripple builds.<p>Remove this marker',{title:'Remove Ripple', button:'Remove', url: '_s_ripple_stop.asp?mode=r&rfile="& scriptName &"&pv_id="& parPv_id &"&rtag_id="& parRtag_id &"'});"`
		1652	`sStopText = "Ripples will stop at this package"`
		1653	`sButtonText = "Remove"`
		1654	`ElseIf dRippleStop = "w" Then`
		1655	`sClickStop="vixConfirm('This package has been marked to prevented ripple builds<br>and a ripple is required.<p>Allow ripple to continue.',{title:'Continue Ripple', button:'Allow Ripple', url: '_s_ripple_stop.asp?mode=g&rfile="& scriptName &"&pv_id="& parPv_id &"&rtag_id="& parRtag_id &"'});"`
		1656	`sStopText = "Ripple required and awaiting manual intervention"`
		1657	`sButtonText = "Resume"`
		1658	`ElseIf dRippleStop = "g" Then`
		1659	`sStopText = "Ripple resumed. Awaiting build"`
		1660	`Else`
		1661	`sStopText = "Ripple Stop: Unknown state:" & dRippleStop`
		1662	`End If`
		1663
		1664	`sPersistText = ""`
6441	dpurdie	1665	`If pkgInfoHash.Exists("persist_ripple_stop") Then`
		1666	`If NOT IsNull(pkgInfoHash.Item("persist_ripple_stop")) Then`
		1667	`sPersistText = " [Persistent Ripple Stop Enabled]"`
		1668	`End If`
6440	dpurdie	1669	`End If`
		1670
		1671	`%>`
		1672	`<tr>`
		1673	`<td width="20%" bgcolor=#e4e9ec class="sublbox_txt">`
		1674	`<strong>Ripple Stop</strong>`
		1675	`<%=Quick_Help ( "ripple_stop" )%>`
		1676	`<td bgcolor=#f5f5f5 class='sublbox_txt'>`
		1677	`<%=sStopText%><%=sPersistText%>`
		1678	`<%If canActionInProject() AND sClickStop <> "" Then%>`
6827	dpurdie	1679	`<span onClick="<%=sClickStop%>" class="txt_linked pointer"><%=sButtonText%><img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
6440	dpurdie	1680	`<%End If%>`
		1681	`</tr>`
		1682	`<%End If%>`
121	hknight	1683	`</table>`
		1684	`</fieldset>`
		1685	`<br>`
		1686	`<%End If%>`
131	ghuddy	1687
119	ghuddy	1688	`<!-- REASON FOR RELEASE ----------------------------------------------------------------------------------------------------------------->`
6324	dpurdie	1689	`<fieldset class="fset">`
		1690	`<legend class="body_colb"><img src='images/s_notes.gif' width='21' height='24' hspace='4' border='0' align='absmiddle'>Reason for this version</legend>`
6610	dpurdie	1691	`<div style="display: block;float: right;margin-top: -25px;background-color: #FFF;padding: 0 5px;">`
		1692	`<span class="clipElement txt_linked" title="Copy to Clipboard" data-target="releaseReason">Copy<%=enum_imgClipBoard12%></span>`
6324	dpurdie	1693	`<%If pageIsEditable Then%>`
6827	dpurdie	1694	`<span onClick="MM_openVixIFrame('_wform_reason_for_version.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Reason For Release')" class="txt_linked pointer">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
6324	dpurdie	1695	`<%End If%>`
		1696	`</div>`
121	hknight	1697	`<a name="REASON_FOR_THIS_RELEASE"></a>`
		1698	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1699	`<tr>`
		1700	`<td align="right" valign="bottom">`
		1701	`<%If pageIsEditable Then%>`
5190	dpurdie	1702	`<button class="form_btn" onClick="return vixConfirm('Current comments would be deleted.<br>Do you wish to continue?',{url :'_update_versions.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>' })">Update Dependencies</button>`
121	hknight	1703	`<%End If%>`
		1704	`</td>`
		1705	`</tr>`
		1706	`</table>`
119	ghuddy	1707
121	hknight	1708	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1709	`<tr>`
161	iaugusti	1710	`<td bgcolor=#f5f5f5>`
121	hknight	1711	`<%If pkgInfoHash.Item ("comments") <> "" Then%>`
		1712	`<table border='0' cellspacing='0' cellpadding='0'>`
		1713	`<tr>`
6610	dpurdie	1714	`<td id=releaseReason class='sublbox_txt '> <%Response.Write( NewLine_To_BR(pkgInfoHash.Item("comments")) )%><br></td>`
121	hknight	1715	`</tr>`
		1716	`</table>`
		1717	`<%ElseIf FixedIssues ( parPv_id ) Then%>`
		1718	`<span class='sublbox_txt'>Not specified.</span><br>`
		1719	`<%Else%>`
		1720	`<span class='err_alert'>Required!</span><br>`
		1721	`<%End If%>`
		1722	`</td>`
		1723	`</tr>`
		1724	`</table>`
		1725	`</fieldset>`
4230	dpurdie	1726	`<br>`
119	ghuddy	1727	`<!-- REASON FOR NON_RIPPLE RELEASE ----------------------------------------------------------------------------------------------------------------->`
121	hknight	1728	`<%If pkgInfoHash.Item ("comments") = "Rippled Build." Then%>`
119	ghuddy	1729
6324	dpurdie	1730	`<fieldset class="fset">`
		1731	`<legend class="body_colb"><img src='images/s_notes.gif' width='21' height='24' hspace='4' border='0' align='absmiddle'>Reason for last non-ripple build</legend>`
121	hknight	1732	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1733	`<tr>`
161	iaugusti	1734	`<td bgcolor=#f5f5f5>`
121	hknight	1735	`<%`
		1736	`'Dim rsQry`
		1737	`Call LastPvId(pkgInfoHash.Item ("pv_id"))`
119	ghuddy	1738
121	hknight	1739	`While rsQry("comments") = "Rippled Build."`
		1740	`Call LastPvId(rsQry("last_pv_id"))`
		1741	`Wend`
119	ghuddy	1742
121	hknight	1743	`If pkgInfoHash.Item ("comments") <> "" Then`
		1744	`Response.write "<table border='0' cellspacing='0' cellpadding='0'>"`
		1745	`Response.write "<tr>"`
		1746	`Response.write "<td class='sublbox_txt'><b>Package Version:</b> <b>"& NewLine_To_BR(( rsQry ("pkg_version") ) ) &"</b><br></td>"`
		1747	`Response.write "</tr>"`
		1748	`Response.write "<tr>"`
		1749	`Response.write "<td class='sublbox_txt'>"& NewLine_To_BR(( rsQry ("comments") ) ) &"<br></td>"`
		1750	`Response.write "</tr>"`
119	ghuddy	1751
121	hknight	1752	`Response.write "</table>"%>`
119	ghuddy	1753
121	hknight	1754	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1755	`<tr>`
		1756	`<td valign="top" class="sublbox_txt"><b>Fixed Issues For Last Non-Ripple Build</b></td>`
		1757	`<td align="right" valign="top">`
		1758	`<%If pageIsEditable Then%>`
6827	dpurdie	1759	`<span onClick="MM_openVixIFrame('_wform_import_issues.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&skip_open=true','Import Fixed Issues')" class="txt_linked pointer">Import Fixed Issues from ClearQuest<img src="images/i_download.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></span>`
121	hknight	1760	`<%End If%>`
		1761	`</td>`
		1762	`</tr>`
		1763	`</table>`
		1764	`<%Call Get_Package_Issues ( parPv_id, SQLstr, fixedIssDict, notesIssDict, enumISSUES_STATE_FIXED )`
		1765	`If (retVal > 0) Then`
		1766	`retVal = Get_CQ_Issues ( SQLstr, rsCQ )`
		1767	`If retVal = 0 Then%>`
		1768	`<table width="100%" border="0" cellspacing="1" cellpadding="3">`
		1769	`<tr>`
161	iaugusti	1770	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field" align="center">Fixed</td>`
		1771	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue Id </td>`
		1772	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue DB </td>`
		1773	`<td bgcolor=#e4e9ec nowrap width="100%" class="form_field">Summary</td>`
		1774	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue Type </td>`
		1775	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Priority</td>`
		1776	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Status</td>`
		1777	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Note</td>`
		1778	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field"> </td>`
121	hknight	1779	`</tr>`
		1780	`<%If ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF)) Then%>`
		1781	`<%While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF))%>`
		1782	`<tr>`
161	iaugusti	1783	`<td align="center" nowrap bgcolor=#e4e9ec><img src="images/i_tick_black.gif" width="7" height="7" vspace="2"></td>`
6827	dpurdie	1784	`<td bgcolor=#f5f5f5 nowrap class="form_item"><span onClick="MM_openVixIFrame('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Details')" class="txt_linked pointer"><%=rsCQ("iss_num")%></span></td>`
3975	dpurdie	1785	`<td bgcolor=#f5f5f5 class="form_item">`
4553	dpurdie	1786	`<%If Cint(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then%>`
3975	dpurdie	1787	`DEVI`
		1788	`<%Else%>`
		1789	`UNKNOWN`
		1790	`<%End If%></td>`
161	iaugusti	1791	`<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>`
		1792	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("issue_type")%></td>`
		1793	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("priority")%></td>`
		1794	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("Status")%></td>`
121	hknight	1795	`<%If sectionIsEditable Then%>`
		1796	`<%If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then%>`
6827	dpurdie	1797	`<td align="center" bgcolor=#f5f5f5 class="form_item"><span class='pointer' onClick="MM_openVixIFrame('_wform_issue_notes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Notes')"><img src="images/i_note_on.gif" width="11" height="12" border="0" title="<%=notesIssDict.Item (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id")))%>"></span></td>`
121	hknight	1798	`<%Else%>`
6827	dpurdie	1799	`<td align="center" bgcolor=#f5f5f5 class="form_item"><span class='pointer' onClick="MM_openVixIFrame('_wform_issue_notes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Notes')"><img src="images/i_note_off.gif" width="11" height="12" border="0" title="Add Note"></span></td>`
121	hknight	1800	`<%End If%>`
		1801	`<%Else%>`
		1802	`<%If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then%>`
161	iaugusti	1803	`<td align="center" bgcolor=#f5f5f5 class="form_item"><img src="images/i_note_on.gif" width="11" height="12" border="0" title="<%=notesIssDict.Item (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id")))%>"></td>`
121	hknight	1804	`<%Else%>`
161	iaugusti	1805	`<td align="center" bgcolor=#f5f5f5 class="form_item"><img src="images/i_note_off.gif" width="11" height="12" border="0"></td>`
121	hknight	1806	`<%End If%>`
		1807	`<%End If%>`
		1808	`<%If NOT pageIsEditable Then%>`
161	iaugusti	1809	`<td align="center" bgcolor=#f5f5f5 class="form_item"><img src="images/i_delete_disable.gif" width="13" height="12" hspace="2" border="0"></td>`
121	hknight	1810	`<%Else%>`
5190	dpurdie	1811	`<td align="center" bgcolor=#f5f5f5 class="form_item"><a href="_remove_issue.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onClick="return vixConfirmDelete('this issue from Release Manager');"><img src="images/i_delete.gif" width="13" height="12" hspace="2" border="0" alt="Delete this issue from the list"></a></td>`
121	hknight	1812	`<%End If%>`
		1813	`</tr>`
		1814	`<%rsCQ.MoveNext`
		1815	`WEnd`
		1816	`rsCQ.Close()%>`
		1817	`<%Else%>`
		1818	`<tr>`
161	iaugusti	1819	`<td bgcolor=#e4e9ec nowrap> </td>`
		1820	`<td bgcolor=#f5f5f5 nowrap></td>`
		1821	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		1822	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		1823	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		1824	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		1825	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		1826	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		1827	`<td align="center" bgcolor=#f5f5f5 class="form_item"></td>`
121	hknight	1828	`</tr>`
		1829	`<%End If%>`
		1830	`</table>`
		1831	`<%End If%>`
		1832	`<%If retVal <> 0 Then Response.write enumMSSQL_ERROR`
		1833	`End If`
		1834	`Else`
		1835	`If FixedIssues ( parPv_id ) Then`
		1836	`Response.write "<span class='sublbox_txt'>Not specified.</span><br>"`
		1837	`Else`
		1838	`Response.write "<span class='err_alert'>Required!</span><br>"`
		1839	`End If`
		1840	`End If`
119	ghuddy	1841
121	hknight	1842	`rsQry.Close()`
		1843	`Set rsQry = nothing`
		1844	`%>`
		1845	`</td>`
		1846	`</tr>`
		1847	`</table>`
		1848	`</fieldset>`
4230	dpurdie	1849	`<br>`
121	hknight	1850	`<%End If%>`
		1851	`<!-- FIXED ISSUES ----------------------------------------------------------------------------------------------------------------------->`
123	ghuddy	1852	`<fieldset class="fset">`
		1853	`<legend class="body_colb">`
6827	dpurdie	1854	`<img src="images/s_bugs.gif" width="21" height="18" border="0" hspace="4" align='absmiddle'>`
123	ghuddy	1855	`Issues`
		1856	`</legend>`
5861	dpurdie	1857	`<a name="ISSUES"></a>`
121	hknight	1858	`<p class="body_colb"><a name="ISSUES"></a></p>`
		1859	`<table width="100%" border="0" cellpadding="2" cellspacing="1">`
		1860	`<tr>`
4254	dpurdie	1861	`<!-- Jira Issues -->`
121	hknight	1862	`<td valign="top" class="body_colb">JIRA Issues</td>`
		1863	`<td align="right" valign="top">`
6827	dpurdie	1864	`<%BuildEditButtonRaw pageIsEditable, "Import JIRA issues", "Edit", TRUE, "src='images/i_download.gif' width='12' height='12' hspace='2' border='0' align='absmiddle'", "MM_openVixIFrame('_wform_import_jira_issues.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"&skip_open=true','Import Issues')" %>`
121	hknight	1865	`</td>`
119	ghuddy	1866
4254	dpurdie	1867	`<%`
		1868	`Dim issueInfo, el, key`
		1869	`Set issueInfo = CreateObject( "Scripting.Dictionary" )`
		1870	`Call getJiraIssueDetails(parPv_id,issueInfo, 0)`
		1871	`If issueInfo.Count > 0 Then`
		1872	`%>`
121	hknight	1873
4254	dpurdie	1874	`<table width="100%" border="0" cellspacing="1" cellpadding="3">`
		1875	`<tr>`
		1876	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field" align="center">Fixed</td>`
		1877	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue Id </td>`
		1878	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue DB </td>`
		1879	`<td bgcolor=#e4e9ec nowrap width="100%" class="form_field">Summary</td>`
		1880	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue Type </td>`
		1881	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Priority</td>`
		1882	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Status</td>`
		1883	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Note</td>`
		1884	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field"> </td>`
		1885	`</tr>`
		1886	`<%`
		1887	`For Each key In issueInfo`
		1888	`Set el = issueInfo.item(key)`
		1889	`%>`
		1890	`<tr>`
		1891	`<%If el.Exists("resolution") Then %>`
		1892	`<td align="center" nowrap bgcolor=#e4e9ec>`
		1893	`<img src="images/i_tick_black.gif" width="7" height="7" vspace="2">`
		1894	`</td>`
		1895	`<%Else%>`
		1896	`<td align="center" nowrap bgcolor=#e4e9ec></td>`
		1897	`<%End If%>`
		1898	`<td bgcolor=#f5f5f5 nowrap class="form_item">`
		1899	`<a href="<%=el.item("url")%>" target="_blank" class="txt_linked"><%=key%></a>`
		1900	`</td>`
		1901	`<td bgcolor=#f5f5f5 class="form_item"><%=el.item("type")%></td>`
		1902	`<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( el.item("summary") ) )%></td>`
		1903	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=el.item("issuetype")%></td>`
		1904	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=el.item("priority")%></td>`
		1905	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=el.item("status")%></td>`
		1906	`<td nowrap bgcolor=#f5f5f5 class="form_item"></td>`
		1907	`<%If NOT pageIsEditable Then%>`
		1908	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
		1909	`<img src="images/i_delete_disable.gif" width="13" height="12" hspace="2" border="0">`
		1910	`</td>`
		1911	`<%Else%>`
		1912	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5190	dpurdie	1913	`<a href="_remove_jira_issue.asp?iss_link=<%=el.item("key")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onClick="return vixConfirmDelete('this issue from Release Manager');">`
4254	dpurdie	1914	`<img src="images/i_delete.gif" width="13" height="12" hspace="2" border="0" alt="Delete this issue from the list">`
		1915	`</a>`
		1916	`</td>`
		1917	`<%End If%>`
		1918	`</tr>`
		1919	`<%`
		1920	`Next`
		1921	`Set issueInfo = nothing`
		1922	`%>`
		1923	`</table>`
121	hknight	1924	`<%End If%>`
119	ghuddy	1925
4254	dpurdie	1926	`<!-- Fixed ClearCase Issues -->`
121	hknight	1927	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		1928	`<tr>`
		1929	`<td valign="top" class="body_colb">Fixed Issues</td>`
		1930	`<td align="right" valign="top">`
6827	dpurdie	1931	`<%BuildEditButtonRaw pageIsEditable, "Import Fixed Issues from ClearQuest", "Edit", TRUE, "src='images/i_download.gif' width='12' height='12' hspace='2' border='0' align='absmiddle'", "MM_openVixIFrame('_wform_import_issues.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"&skip_open=true','Import Fixed Issues')" %>`
121	hknight	1932	`</td>`
		1933	`</tr>`
		1934	`</table>`
119	ghuddy	1935
121	hknight	1936	`<%retVal = Get_Package_Issues ( parPv_id, SQLstr, fixedIssDict, notesIssDict, enumISSUES_STATE_FIXED )`
		1937	`If (retVal > 0) Then`
		1938	`retVal = Get_CQ_Issues ( SQLstr, rsCQ )`
		1939	`If retVal = 0 Then%>`
		1940	`<table width="100%" border="0" cellspacing="1" cellpadding="3">`
		1941	`<tr>`
161	iaugusti	1942	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field" align="center">Fixed</td>`
		1943	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue Id </td>`
		1944	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue DB </td>`
		1945	`<td bgcolor=#e4e9ec nowrap width="100%" class="form_field">Summary</td>`
		1946	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Issue Type </td>`
		1947	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Priority</td>`
		1948	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Status</td>`
		1949	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field">Note</td>`
		1950	`<td bgcolor=#e4e9ec nowrap width="1" class="form_field"> </td>`
121	hknight	1951	`</tr>`
		1952	`<%If ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF)) Then%>`
		1953	`<%While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF))%>`
		1954	`<tr>`
161	iaugusti	1955	`<td align="center" nowrap bgcolor=#e4e9ec><img src="images/i_tick_black.gif" width="7" height="7" vspace="2"></td>`
		1956	`<td bgcolor=#f5f5f5 nowrap class="form_item">`
6827	dpurdie	1957	`<%BuildEditButtonRaw TRUE, rsCQ("iss_num") , "Edit", TRUE, "", "MM_openVixIFrame('_wform_issues_details.asp?iss_db="&rsCQ("iss_db")&"&iss_id="&rsCQ("iss_id")&"','Issue Details')" %>`
123	ghuddy	1958	`</td>`
161	iaugusti	1959	`<td bgcolor=#f5f5f5 class="form_item">`
4553	dpurdie	1960	`<%If CInt(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then%>`
123	ghuddy	1961	`DEVI`
		1962	`<%Else%>`
3975	dpurdie	1963	`UNKNOWN`
123	ghuddy	1964	`<%End If%>`
		1965	`</td>`
161	iaugusti	1966	`<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>`
		1967	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("issue_type")%></td>`
		1968	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("priority")%></td>`
		1969	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("Status")%></td>`
6827	dpurdie	1970	`<%If sectionIsEditable AND pageIsEditable Then`
		1971	`Dim noteImage`
		1972	`If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then`
		1973	`noteImage = "images/i_note_on.gif"`
		1974	`Else`
		1975	`noteImage = "images/i_note_off.gif"`
		1976	`End If`
		1977	`End If`
		1978	`%>`
		1979
		1980
121	hknight	1981	`<%If sectionIsEditable AND pageIsEditable Then%>`
		1982	`<%If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then%>`
161	iaugusti	1983	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5590	dpurdie	1984	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_issue_notes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Notes')">`
123	ghuddy	1985	`<img src="images/i_note_on.gif" width="11" height="12" border="0" title="<%=notesIssDict.Item (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id")))%>">`
		1986	`</a>`
		1987	`</td>`
121	hknight	1988	`<%Else%>`
161	iaugusti	1989	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5590	dpurdie	1990	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_issue_notes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Notes')">`
123	ghuddy	1991	`<img src="images/i_note_off.gif" width="11" height="12" border="0" title="Add Note">`
		1992	`</a>`
		1993	`</td>`
121	hknight	1994	`<%End If%>`
		1995	`<%Else%>`
		1996	`<%If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then%>`
161	iaugusti	1997	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
123	ghuddy	1998	`<img src="images/i_note_on.gif" width="11" height="12" border="0" title="<%=notesIssDict.Item (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id")))%>">`
		1999	`</td>`
121	hknight	2000	`<%Else%>`
161	iaugusti	2001	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
123	ghuddy	2002	`<img src="images/i_note_off.gif" width="11" height="12" border="0">`
		2003	`</td>`
121	hknight	2004	`<%End If%>`
		2005	`<%End If%>`
		2006	`<%If NOT pageIsEditable Then%>`
161	iaugusti	2007	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
123	ghuddy	2008	`<img src="images/i_delete_disable.gif" width="13" height="12" hspace="2" border="0">`
		2009	`</td>`
121	hknight	2010	`<%Else%>`
161	iaugusti	2011	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5190	dpurdie	2012	`<a href="_remove_issue.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onClick="return vixConfirmDelete('this issue from Release Manager');">`
123	ghuddy	2013	`<img src="images/i_delete.gif" width="13" height="12" hspace="2" border="0" alt="Delete this issue from the list">`
		2014	`</a>`
		2015	`</td>`
121	hknight	2016	`<%End If%>`
		2017	`</tr>`
		2018	`<%rsCQ.MoveNext`
		2019	`WEnd`
		2020	`rsCQ.Close()%>`
		2021	`<%Else%>`
		2022	`<tr>`
161	iaugusti	2023	`<td bgcolor=#e4e9ec nowrap> </td>`
		2024	`<td bgcolor=#f5f5f5 nowrap></td>`
		2025	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2026	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2027	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2028	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2029	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2030	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2031	`<td align="center" bgcolor=#f5f5f5 class="form_item"></td>`
121	hknight	2032	`</tr>`
		2033	`<%End If%>`
119	ghuddy	2034
121	hknight	2035	`</table>`
		2036	`<%End If%>`
		2037	`<%If retVal <> 0 Then Response.write enumMSSQL_ERROR%>`
		2038	`<%End If%>`
119	ghuddy	2039
4254	dpurdie	2040	`<!-- Outstanding ClearCase Issues -->`
121	hknight	2041	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2042	`<tr>`
		2043	`<td valign="top" class="body_colb">Outstanding Issues</td>`
		2044	`<td align="right" valign="top">`
		2045	`<%If pageIsEditable Then%>`
5590	dpurdie	2046	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_import_issues.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Import Issues')" class="txt_linked">`
123	ghuddy	2047	`Import Outstanding Issues from ClearQuest`
6827	dpurdie	2048	`<img src="images/i_download.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'>`
123	ghuddy	2049	`</a>`
121	hknight	2050	`<%End If%>`
		2051	`</td>`
		2052	`</tr>`
		2053	`</table>`
119	ghuddy	2054
121	hknight	2055	`<%retVal = Get_Package_Issues ( parPv_id, SQLstr, fixedIssDict, notesIssDict, enumISSUES_STATE_IMPORTED )`
		2056	`If (retVal > 0) Then`
		2057	`retVal = Get_CQ_Issues ( SQLstr, rsCQ )`
		2058	`If retVal = 0 Then%>`
		2059	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2060	`<form name="fixedissues" method="get" action="_update_issues_state.asp">`
		2061	`<tr>`
		2062	`<%If pageIsEditable Then%>`
161	iaugusti	2063	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field" align="center">Fixed</td>`
121	hknight	2064	`<%End If%>`
161	iaugusti	2065	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Issue Id </td>`
		2066	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Issue DB </td>`
		2067	`<td bgcolor=#e4e9ec nowrap width="100%" class="form_field">Summary</td>`
		2068	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Issue Type </td>`
		2069	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Priority</td>`
		2070	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Status</td>`
		2071	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Note</td>`
		2072	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field"> </td>`
121	hknight	2073	`</tr>`
		2074	`<%If ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF)) Then%>`
		2075	`<%While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF))%>`
		2076	`<tr>`
		2077	`<%If pageIsEditable Then%>`
161	iaugusti	2078	`<td align="center" nowrap bgcolor=#e4e9ec>`
123	ghuddy	2079	`<input type="checkbox" name="FRfixed" value="<%=rsCQ("iss_db") &"."& rsCQ("iss_id")%>">`
		2080	`</td>`
121	hknight	2081	`<%End If%>`
161	iaugusti	2082	`<td bgcolor=#f5f5f5 nowrap class="form_item">`
5590	dpurdie	2083	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Details')" class="txt_linked">`
123	ghuddy	2084	`<%=rsCQ("iss_num")%>`
		2085	`</a>`
		2086	`</td>`
161	iaugusti	2087	`<td bgcolor=#f5f5f5 class="form_item">`
4553	dpurdie	2088	`<%If CInt(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then%>`
123	ghuddy	2089	`DEVI`
		2090	`<%Else%>`
4553	dpurdie	2091	`UNKNOWN`
123	ghuddy	2092	`<%End If%>`
		2093	`</td>`
161	iaugusti	2094	`<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>`
		2095	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("issue_type")%></td>`
		2096	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("priority")%></td>`
		2097	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("Status")%></td>`
121	hknight	2098	`<%If sectionIsEditable AND pageIsEditable Then%>`
		2099	`<%If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then%>`
161	iaugusti	2100	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5590	dpurdie	2101	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_issue_notes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Notes')">`
123	ghuddy	2102	`<img src="images/i_note_on.gif" width="11" height="12" border="0" alt="<%=notesIssDict.Item (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id")))%>">`
		2103	`</a>`
		2104	`</td>`
121	hknight	2105	`<%Else%>`
161	iaugusti	2106	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5590	dpurdie	2107	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_issue_notes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','Issue Notes')">`
123	ghuddy	2108	`<img src="images/i_note_off.gif" width="11" height="12" border="0" alt="Add Note">`
		2109	`</a>`
		2110	`</td>`
121	hknight	2111	`<%End If%>`
		2112	`<%Else%>`
		2113	`<%If notesIssDict.Exists (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id"))) Then%>`
161	iaugusti	2114	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
123	ghuddy	2115	`<img src="images/i_note_on.gif" width="11" height="12" border="0" alt="<%=notesIssDict.Item (Cstr(rsCQ("iss_db") &"."& rsCQ("iss_id")))%>">`
		2116	`</td>`
121	hknight	2117	`<%Else%>`
161	iaugusti	2118	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
123	ghuddy	2119	`<img src="images/i_note_off.gif" width="11" height="12" border="0">`
		2120	`</td>`
121	hknight	2121	`<%End If%>`
		2122	`<%End If%>`
		2123	`<%If NOT pageIsEditable Then%>`
161	iaugusti	2124	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
123	ghuddy	2125	`<img src="images/i_delete_disable.gif" width="13" height="12" hspace="2" border="0">`
		2126	`</td>`
121	hknight	2127	`<%Else%>`
161	iaugusti	2128	`<td align="center" bgcolor=#f5f5f5 class="form_item">`
5190	dpurdie	2129	`<a href="_remove_issue.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onClick="return vixConfirmDelete('this issue from Release Manager');">`
123	ghuddy	2130	`<img src="images/i_delete.gif" width="13" height="12" hspace="2" border="0" alt="Delete this issue from the list">`
		2131	`</a>`
		2132	`</td>`
121	hknight	2133	`<%End If%>`
		2134	`</tr>`
		2135	`<%rsCQ.MoveNext`
		2136	`WEnd`
		2137	`rsCQ.Close()%>`
		2138	`<%If pageIsEditable Then%>`
		2139	`<tr>`
161	iaugusti	2140	`<td align="center" nowrap bgcolor=#e4e9ec>`
123	ghuddy	2141	`<input type="submit" name="Apply" value="Apply" class="form_btn">`
		2142	`</td>`
121	hknight	2143	`<td></td>`
		2144	`<td></td>`
		2145	`<td></td>`
		2146	`<td></td>`
		2147	`<td></td>`
		2148	`<td></td>`
		2149	`<td></td>`
		2150	`<td></td>`
		2151	`</tr>`
		2152	`<%End If%>`
		2153	`<%Else%>`
		2154	`<tr>`
		2155	`<%If pageIsEditable Then%>`
161	iaugusti	2156	`<td bgcolor=#e4e9ec nowrap> </td>`
121	hknight	2157	`<%End If%>`
161	iaugusti	2158	`<td bgcolor=#f5f5f5 nowrap></td>`
		2159	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2160	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2161	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2162	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2163	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2164	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2165	`<td align="center" bgcolor=#f5f5f5 class="form_item"></td>`
121	hknight	2166	`</tr>`
		2167	`<%End If%>`
		2168	`<input name="pv_id" type="hidden" value="<%=parPv_id%>">`
		2169	`<input name="rtag_id" type="hidden" value="<%=parRtag_id%>">`
		2170	`</form>`
		2171	`</table>`
		2172	`<%End If%>`
		2173	`<%If retVal <> 0 Then Response.write enumMSSQL_ERROR%>`
		2174	`<%End If%>`
123	ghuddy	2175	`<!-- DEVI-050133 Although it would seem to the human eye that the following row and table closing tags are needed, -->`
		2176	`<!-- they do in fact cause the page to be rendered incorrectly. Hence they are commented out for now -->`
		2177	`<!-- until the true cause of the mis-rendering can be ascertained. -->`
		2178	`<!-- </tr> -->`
		2179	`<!-- </table> -->`
121	hknight	2180	`</fieldset>`
4230	dpurdie	2181	`<br>`
119	ghuddy	2182	`<!-- DEPENDENCY ISSUES (NOT FOR PATCHES!) ------------------------------------------------------------------------------------------------------->`
		2183
121	hknight	2184	`<%If IsNull(pkgInfoHash.Item ("is_patch")) Then%>`
6827	dpurdie	2185	`<fieldset class="fset"><legend class="body_colb"><img src="images/s_bugs.gif" width="21" height="18" border="0" hspace="4" align='absmiddle'>Dependency Issues</legend>`
121	hknight	2186	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
119	ghuddy	2187
4585	dpurdie	2188	`<%`
		2189	`If Request("ShowIssues") <> "" Then`
		2190	`retVal = Get_Package_Issues ( parPv_id, SQLstr, NULL, NULL, NULL )`
		2191	`Else`
		2192	`retVal = 0`
		2193	`%>`
		2194	`<tr>`
		2195	`<td class="sublbox_txt">`
		2196	`<a href="javascript:window.location.href=window.location.href+'&ShowIssues=1'">Show Issues of Dependent Packages</a>`
		2197	`</td>`
		2198	`</tr>`
		2199	`<%`
		2200	`End If`
121	hknight	2201	`If (retVal > 0) Then`
		2202	`retVal = Get_Dependency_CQ_Issues ( SQLstr, rsCQ, depIssDict, issArr )`
		2203	`If retVal = 0 Then%>`
		2204	`<%`
		2205	`currG1 = 0`
		2206	`G1_template = _`
		2207	`"<tr>"&_`
		2208	`" <td colspan='7'><img src='images/spacer.gif' width='2' height='2'></td>"&_`
		2209	`"</tr>"&_`
		2210	`"<tr>"&_`
161	iaugusti	2211	`" <td colspan='7' bgcolor=#e4e9ec class='form_item'>/DEP_NAME_VERSION//REASONS/</td>"&_`
121	hknight	2212	`"</tr>"`
		2213	`Set rsDepIss = OraDatabase.DbCreateDynaset( SQL_Dependency_Issues( parPv_id ), cint(0))`
		2214	`%>`
		2215	`<%If ((NOT rsDepIss.BOF) AND (NOT rsDepIss.EOF)) Then%>`
		2216	`<%While ((NOT rsDepIss.BOF) AND (NOT rsDepIss.EOF))%>`
		2217	`<%`
		2218	`iss_db_id = Cstr(rsDepIss("iss_db") &"."& rsDepIss("iss_id"))`
		2219	`G1_style = Replace(G1_template, "/DEP_NAME_VERSION/", "<SPAN class='envolPkg'><b>"& rsDepIss("pkg_name") &" "& rsDepIss("pkg_version") &"</b></SPAN>")`
		2220	`If IsNull(rsDepIss("iss_id")) Then`
		2221	`If IsNull(rsDepIss("reasons")) Then`
		2222	`G1_style = Replace(G1_style, "/REASONS/", "<br>Reason for this version is not specified.")`
		2223	`Else`
		2224	`G1_style = Replace(G1_style, "/REASONS/", "<br>"& NewLine_To_BR ( To_HTML ( rsDepIss("reasons") ) ) )`
		2225	`End If`
		2226	`Else`
		2227	`If IsNull(rsDepIss("reasons")) Then`
		2228	`G1_style = Replace(G1_style, "/REASONS/", "")`
		2229	`Else`
		2230	`G1_style = Replace(G1_style, "/REASONS/", "<br>"& NewLine_To_BR ( To_HTML ( rsDepIss("reasons") ) ) )`
		2231	`End If`
		2232	`End If`
119	ghuddy	2233
121	hknight	2234	`Call Group_By ( rsDepIss("pv_id"), G1_style, currG1 )`
		2235	`If NOT IsNull(rsDepIss("iss_id")) Then`
		2236	`If rsDepIss("pv_id") <> currG1 Then`
		2237	`currG1 = rsDepIss("pv_id")%>`
		2238	`<tr>`
161	iaugusti	2239	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field" align="center"></td>`
		2240	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field" align="center">Fixed</td>`
		2241	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Issue Id </td>`
		2242	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Issue DB </td>`
		2243	`<td bgcolor=#e4e9ec nowrap width="100%" class="form_field">Summary</td>`
		2244	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Issue Type </td>`
		2245	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Priority</td>`
121	hknight	2246	`</tr>`
		2247	`<%End If%>`
		2248	`<tr>`
161	iaugusti	2249	`<td bgcolor=#e4e9ec></td>`
		2250	`<td align="center" nowrap bgcolor=#f5f5f5>`
121	hknight	2251	`<%If CInt(rsDepIss("iss_state")) = enumISSUES_STATE_FIXED Then%>`
		2252	`<img src="images/i_tick_black.gif" width="7" height="7" vspace="2">`
		2253	`<%Else%>`
		2254	`<img src="images/spacer.gif" width="7" height="7" vspace="2">`
		2255	`<%End If%>`
		2256	`</td>`
5590	dpurdie	2257	`<td bgcolor=#f5f5f5 nowrap class="form_item"><a href="javascript:;" onClick="MM_openVixIFrame('_wform_issues_details.asp?iss_db=<%=asDepIss( iss_db_id, enumLoc_iss_db )%>&iss_id=<%=asDepIss( iss_db_id, enumLoc_iss_id )%>','Issue Details')" class="txt_linked"><%=asDepIss( iss_db_id, enumLoc_iss_num )%></a></td>`
3975	dpurdie	2258	`<td bgcolor=#f5f5f5 class="form_item">`
4553	dpurdie	2259	`<%If CInt(asDepIss( iss_db_id, enumLoc_iss_db )) = enumCLEARQUEST_DEVI_ID Then%>`
3975	dpurdie	2260	`DEVI`
		2261	`<%Else%>`
		2262	`UNKNOWN`
		2263	`<%End If%></td>`
161	iaugusti	2264	`<td bgcolor=#f5f5f5 class="form_item"><%=asDepIss( iss_db_id, enumLoc_summary)%></td>`
		2265	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=asDepIss( iss_db_id, enumLoc_issue_type)%></td>`
		2266	`<td nowrap bgcolor=#f5f5f5 class="form_item"><%=asDepIss( iss_db_id, enumLoc_priority)%></td>`
121	hknight	2267	`</tr>`
		2268	`<%End If%>`
		2269	`<%rsDepIss.MoveNext`
		2270	`WEnd`
		2271	`rsDepIss.Close()`
		2272	`Set rsDepIss = nothing%>`
		2273	`<%Else%>`
		2274	`<tr>`
161	iaugusti	2275	`<td bgcolor=#e4e9ec nowrap> </td>`
		2276	`<td bgcolor=#f5f5f5></td>`
		2277	`<td bgcolor=#f5f5f5></td>`
		2278	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2279	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2280	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2281	`<td bgcolor=#f5f5f5 class="form_item"></td>`
121	hknight	2282	`</tr>`
		2283	`<%End If%>`
		2284	`<%End If%>`
		2285	`<%If retVal <> 0 Then Response.write enumMSSQL_ERROR%>`
		2286	`<%End If%>`
		2287	`</table>`
		2288	`</fieldset>`
4230	dpurdie	2289	`<br>`
121	hknight	2290	`<%End If%>`
119	ghuddy	2291	`<!-- UNIT TESTS --------------------------------------------------------------------------------------------------------------------->`
121	hknight	2292	`<%`
		2293	`Dim testCheckMSG, testCheckMSG_ID, testCheckNote, testCheckTestsFound`
		2294	`Call CheckUnitTestsState ( parPv_id, testCheckMSG, testCheckMSG_ID, testCheckNote, testCheckTestsFound )`
		2295	`Set rsQry = OraDatabase.DbCreateDynaset( SQL_Unit_Tests ( parPv_id ), cint(0))`
		2296	`%>`
6324	dpurdie	2297	`<fieldset class="fset">`
6827	dpurdie	2298	`<legend class="body_colb"><img src="images/i_unit_test.gif" width="18" height="25" hspace="4" border="0" align='absmiddle' alt="">Unit Tests`
		2299	`<%If testCheckMSG_ID = 0 AND (pkgInfoHash.Item("dlocked") <> "Y") Then%>`
121	hknight	2300	`  <%=testCheckMSG%>`
		2301	`<%End If%></legend>`
6324	dpurdie	2302	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
		2303	`<%If ( scriptName = "fixed_issues.asp" ) Then%>`
		2304	`<%If objAccessControl.UserLogedIn AND (pageIsEditable OR (pkgInfoHash.Item("dlocked") = "Y")) Then%>`
6827	dpurdie	2305	`<a href='javascript:;' onClick="MM_openVixIFrame('_wform_unit_test.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Add Unit Test')" class="txt_linked">New Test<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align='absmiddle' alt="Add new test."></a>`
6324	dpurdie	2306	`<%End If%>`
		2307	`<%If (NOT testCheckTestsFound) AND (testCheckMSG_ID = 0) Then%>`
6827	dpurdie	2308	`<a href='_not_done_unit_test.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&notdone=Y' class='txt_linked'>Click here if Not Done!<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align='absmiddle' alt="Add new test."></a>`
6324	dpurdie	2309	`<%End If%>`
		2310	`<%End If%>`
		2311	`</div>`
121	hknight	2312	`<a name="UNIT_TESTS"></a>`
		2313	`<%If (NOT testCheckTestsFound) AND (testCheckMSG_ID = -1) Then%>`
		2314	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2315	`<tr>`
161	iaugusti	2316	`<td bgcolor=#f5f5f5 class="form_item">`
121	hknight	2317	`<%Call DisplayInfo ( "UNIT_TEST_NOT_DONE", 300 )%>`
		2318	`<span class="rep_small">Last Modified: <%=testCheckMSG%></span><br>`
		2319	`<%=NewLine_To_BR( To_HTML ( testCheckNote ) )%>`
		2320	`</td>`
		2321	`</tr>`
		2322	`</table>`
		2323	`<%End If%>`
119	ghuddy	2324
121	hknight	2325	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2326	`<form name="review" method="get" action="_update_unit_test_accepted_state.asp">`
		2327	`<tr>`
161	iaugusti	2328	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" valign="middle"> Test Type </td>`
		2329	`<td width="100%" nowrap bgcolor=#e4e9ec class="form_field" valign="middle"> Test Summary </td>`
		2330	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" align="center" valign="middle">Test<br>Completed</td>`
		2331	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" align="center" valign="middle"> Passed<br># / Total </td>`
		2332	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" align="center" valign="middle"> Results </td>`
		2333	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" align="center" valign="middle"> Accepted </td>`
		2334	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" align="center" valign="middle">Review<br>Completed</td>`
		2335	`<td width="1%" nowrap bgcolor=#e4e9ec class="form_field" valign="middle">Comments /<br>Issue#</td>`
		2336	`<td width="1%" bgcolor=#e4e9ec></td>`
121	hknight	2337	`</tr>`
		2338	`<%While ((NOT rsQry.BOF) AND (NOT rsQry.EOF) )%>`
		2339	`<tr>`
		2340	`<%If NOT pageIsEditable Then%>`
		2341	`<%If NOT IsNull(rsQry("test_id")) AND ( scriptName = "fixed_issues.asp") Then%>`
6827	dpurdie	2342	`<td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><a href="javascript:;" onClick="MM_openVixIFrame('_wform_update_unit_test.asp?test_id=<%=rsQry("test_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Update Unit Test')" class="txt_linked"><img src="images/i_test.gif" width="16" height="16" hspace="3" align='absmiddle' border="0"><%=rsQry("test_type_name")%></a></td>`
121	hknight	2343	`<%Else%>`
6827	dpurdie	2344	`<td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><img src="images/i_test.gif" width="16" height="16" hspace="3" align='absmiddle'><%=rsQry("test_type_name")%></td>`
121	hknight	2345	`<%End If%>`
		2346	`<%Else%>`
6827	dpurdie	2347	`<td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><a href="javascript:;" onClick="MM_openVixIFrame('<%If Not IsNull(rsQry("test_id")) Then%>_wform_update_unit_test.asp<%Else%>_wform_unit_test.asp<%End If%>?test_id=<%=rsQry("test_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&test_type_id=<%=rsQry("test_type_id")%>','Update Unit Test')" class="txt_linked"><img src="images/i_test.gif" width="16" height="16" hspace="3" align='absmiddle' border="0"><%=rsQry("test_type_name")%></a></td>`
121	hknight	2348	`<%End If%>`
161	iaugusti	2349	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=NewLine_To_BR( To_HTML( rsQry("test_summary") ))%></td>`
6610	dpurdie	2350	`<td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><%If ( NOT IsNull(rsQry("tester")) ) Then%><%=DisplayDate ( rsQry("completion_date") )%><br>by <%=emailField(rsQry("tester"),rsQry("tester_email"))%><%End If%></td>`
161	iaugusti	2351	`<td nowrap bgcolor=#f5f5f5 class="form_item" valign="top" align="center"><%=rsQry("numof_test")%></td>`
119	ghuddy	2352
121	hknight	2353	`<%If CInt(rsQry("test_type_id")) = enumTEST_TYPE_AUTOMATIC Then%>`
161	iaugusti	2354	`<td bgcolor=#f5f5f5 class="form_item" align="center" valign="top">`
121	hknight	2355	`<%If NOT IsNull( rsQry("results_url") ) Then%>`
		2356	`<%If InStr( rsQry("results_url"), "http://" ) = 1 Then%>`
		2357	`<a href="<%=rsQry("results_url")%>" target="_blank"><img src="images/i_results.gif" width="15" height="16" border="0" alt="View test results"></a>`
		2358	`<%Else%>`
3959	dpurdie	2359	`<a href="<%=dpkg_archiveURL & pkgInfoHash.Item ("pkg_name") &"/"& pkgInfoHash.Item ("pkg_version") & rsQry("results_url")%>" target="_blank"><img src="images/i_results.gif" width="15" height="16" border="0" alt="View test results"></a>`
121	hknight	2360	`<%End If%>`
		2361	`<%End If%>`
		2362	`</td>`
		2363	`<%Else%>`
161	iaugusti	2364	`<td bgcolor=#f5f5f5 class="form_item" align="center" valign="top">`
121	hknight	2365	`<%If NOT IsNull( rsQry("results_attachment_name") ) Then%>`
4809	dpurdie	2366	`<a href="<%=TEMP_FOLDER &"/"& pkgInfoHash.Item ("pkg_name") &"/"& pkgInfoHash.Item ("pkg_version") &"/"& rsQry("results_attachment_name")%>" target="_blank"><img src="images/i_results.gif" width="15" height="16" border="0" alt="View test results"></a>`
121	hknight	2367	`<%End If%>`
		2368	`</td>`
		2369	`<%End If%>`
119	ghuddy	2370
161	iaugusti	2371	`<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top" align="center"><%=FormatAccepted( rsQry("test_accepted"), rsQry("test_id") )%></td>`
6610	dpurdie	2372	`<td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><%If NOT IsNull(rsQry("reviewee")) Then%><%=DisplayDate ( rsQry("acceptance_date") )%><br>by <%=emailField(rsQry("reviewee"),rsQry("reviewee_email"))%><%End If%></td>`
161	iaugusti	2373	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=NewLine_To_BR( To_HTML( rsQry("review_comments") ))%></td>`
119	ghuddy	2374
157	ghuddy	2375	`<%`
		2376	`If ( ( pageIsEditable _`
		2377	`AND (scriptName = "fixed_issues.asp") _`
		2378	`AND (IsNull(rsQry("test_accepted")) OR (rsQry("test_accepted") = enumUNIT_TEST_NOTACCEPTED))) _`
		2379	`OR _`
		2380	`( objAccessControl.UserLogedIn _`
		2381	`AND (scriptName = "fixed_issues.asp") _`
		2382	`AND (pkgInfoHash.Item("dlocked") = "Y") _`
		2383	`AND (IsNull(rsQry("test_accepted")) OR (rsQry("test_accepted") = enumUNIT_TEST_NOTACCEPTED)) _`
		2384	`AND (rsQry("test_type_id") <> CStr(enumTEST_TYPE_AUTOBUILD_UTF))) ) Then`
		2385	`%>`
5190	dpurdie	2386	`<td bgcolor=#f5f5f5 valign="top"><%If NOT IsNull(rsQry("test_id")) Then%><a href="_remove_unit_test.asp?test_id=<%=rsQry("test_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onClick="return vixConfirmDelete('this unit test');"><img src="images/i_delete.gif" alt="Remove this test." width="13" height="12" hspace="3" border="0"></a><%End If%></td>`
157	ghuddy	2387	`<%Else%>`
161	iaugusti	2388	`<td bgcolor=#f5f5f5 valign="top"></td>`
121	hknight	2389	`<%End If%>`
		2390	`</tr>`
157	ghuddy	2391	`<%`
		2392	`rsQry.MoveNext`
		2393	`WEnd`
		2394	`%>`
121	hknight	2395	`<tr>`
		2396	`<td class="form_field"></td>`
		2397	`<td class="form_field"></td>`
		2398	`<td class="form_field"></td>`
		2399	`<td class="form_field"></td>`
		2400	`<td class="form_field"></td>`
157	ghuddy	2401	`<td class="form_field" align="center">`
		2402	`<%If (testCheckTestsFound) AND (testCheckMSG_ID = 0) AND ( scriptName = "fixed_issues.asp" ) AND pageIsEditable Then%>`
		2403	`<input type="submit" name="Apply" value="Apply" class="form_btn">`
		2404	`<%End If%>`
		2405	`</td>`
121	hknight	2406	`<td class="form_field"></td>`
		2407	`<td class="form_field"></td>`
		2408	`<td class="form_field"></td>`
		2409	`</tr>`
		2410	`<input name="pv_id" type="hidden" value="<%=parPv_id%>">`
		2411	`<input name="rtag_id" type="hidden" value="<%=parRtag_id%>">`
		2412	`</form>`
		2413	`</table>`
		2414	`</fieldset>`
4230	dpurdie	2415	`<br>`
119	ghuddy	2416	`<!-- CODE REVIEW ------------------------------------------------------------------------------------------------------------------->`
6324	dpurdie	2417	`<%Set rsQry = OraDatabase.DbCreateDynaset( SQL_CodeReview ( parPv_id ), cint(0))%>`
		2418	`<fieldset class="fset">`
		2419	`<legend class="body_colb"><img src='images/s_code_review.gif' width='21' height='23' hspace='4' border='0' align='absmiddle'>Code Review</legend>`
		2420	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
		2421	`<%If ( scriptName = "fixed_issues.asp" ) Then%>`
		2422	`<%If objAccessControl.UserLogedIn AND (pageIsEditable OR (pkgInfoHash.Item("dlocked") = "Y")) Then%>`
6827	dpurdie	2423	`<a href='javascript:;' onClick="MM_openBrWindow('_wform_update_code_review.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','CodeReviewEdit','scrollbars=yes,status=yes,resizable=yes,width=950,height='+ ( screen.height - 100 ) +',top=0,left=0')" class="txt_linked">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></a>`
6324	dpurdie	2424	`<%End If%>`
		2425	`<%If rsQry.RecordCount > 0 Then%>`
		2426	`<%If NOT IsNull(rsQry("date_of_review")) Then%>`
		2427	` `
6827	dpurdie	2428	`<a href='javascript:;' onClick="MM_openBrWindow('_wform_code_review.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','CodeReviewView','scrollbars=yes,status=yes,resizable=yes,width=950,height='+ ( screen.height - 100 ) +',top=0,left=0')" class="txt_linked">View<img src="images/i_open.gif" width="12" height="12" hspace="2" border="0" align='absmiddle'></a>`
6324	dpurdie	2429	`<%End If%>`
		2430	`<%End If%>`
		2431	`<%End If%>`
		2432	`</div>`
121	hknight	2433	`<a name="CODE_REVIEW" id="CODE_REVIEW"></a>`
		2434	`<%If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then%>`
		2435	`<%If NOT IsNull(rsQry("date_of_review")) Then%>`
119	ghuddy	2436	`<table width="100%" border="0" cellspacing="1" cellpadding="4">`
121	hknight	2437	`<tr>`
161	iaugusti	2438	`<td width="1%" align="right" nowrap bgcolor=#e4e9ec class="form_field">Date of Review</td>`
5632	dpurdie	2439	`<td width="1%" nowrap bgcolor=#f5f5f5 class="form_item"><%=DisplayDate ( rsQry("date_of_review") )%>   </td>`
161	iaugusti	2440	`<td width="1%" align="right" nowrap bgcolor=#e4e9ec class="form_field">   Time Spent:</td>`
		2441	`<td width="100%" bgcolor=#f5f5f5 class="form_item"><%=rsQry("time_spent")%> hrs </td>`
121	hknight	2442	`</tr>`
		2443	`<tr>`
161	iaugusti	2444	`<td align="right" valign="top" nowrap bgcolor=#e4e9ec class="form_field">Reason for Review</td>`
		2445	`<td colspan="3" bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR( To_HTML( rsQry("review_reason") ))%></td>`
121	hknight	2446	`</tr>`
		2447	`<tr>`
161	iaugusti	2448	`<td align="right" nowrap bgcolor=#e4e9ec class="form_field">Review Results </td>`
		2449	`<td colspan="3" bgcolor=#f5f5f5 class="form_item">`
121	hknight	2450	`<%=DecodeOverallResult( rsQry("review_results") )%>`
		2451	`</td>`
		2452	`</tr>`
		2453	`<tr>`
161	iaugusti	2454	`<td align="right" nowrap bgcolor=#e4e9ec class="form_field">Issues Raised </td>`
		2455	`<td colspan="3" bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR( To_HTML( rsQry("issues_raised") ))%></td>`
121	hknight	2456	`</tr>`
119	ghuddy	2457	`</table>`
121	hknight	2458	`<%Else%>`
119	ghuddy	2459	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
121	hknight	2460	`<tr>`
161	iaugusti	2461	`<td bgcolor=#f5f5f5><span class='sublbox_txt'>No details found.</span></td>`
121	hknight	2462	`</tr>`
119	ghuddy	2463	`</table>`
121	hknight	2464	`<%End If%>`
		2465	`<%Else%>`
		2466	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2467	`<tr>`
161	iaugusti	2468	`<td bgcolor=#f5f5f5><span class='sublbox_txt'>No details found.</span></td>`
121	hknight	2469	`</tr>`
		2470	`</table>`
		2471	`<%End If%>`
119	ghuddy	2472
121	hknight	2473	`<!-- Code Review URL section for this version -->`
		2474	`<%Call GetCodeReviewURLs( parPv_id, rsCodeReviewURL )%>`
		2475	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2476	`<tr>`
		2477	`<td align="left" valign="top" class="body_colb">Code Review URL for this version</td>`
		2478	`<td align="right" valign="top" <%If NOT IsNull(rsCodeReviewURL("url")) Then Response.Write("colspan='5'")%>>`
157	ghuddy	2479	`<%If (scriptName = "fixed_issues.asp") AND objAccessControl.UserLogedIn AND (pageIsEditable OR (pkgInfoHash.Item("dlocked") = "Y")) Then%>`
6827	dpurdie	2480	`<a href="javascript:;" onclick="MM_openVixIFrame('_wform_edit_code_review_url.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Edit Code Review URL')" class="txt_linked">New<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align='absmiddle'></a>`
121	hknight	2481	`<%End If%>`
		2482	`</td>`
		2483	`</tr>`
		2484	`<%If IsNull(rsCodeReviewURL("full_url")) Then %>`
		2485	`<tr>`
161	iaugusti	2486	`<td bgcolor=#f5f5f5 width="100%" class="form_item" colspan="2">`
121	hknight	2487	`<span class='sublbox_txt'>No details found.</span>`
		2488	`</td>`
		2489	`</tr>`
		2490	`<%Else%>`
		2491	`<tr>`
161	iaugusti	2492	`<td bgcolor=#e4e9ec class="form_field">URL</td>`
		2493	`<td bgcolor=#e4e9ec width="25%" class="form_field">Reason for Review</td>`
		2494	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Date of Review</td>`
		2495	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Last Modified</td>`
		2496	`<td bgcolor=#e4e9ec nowrap width="18px" class="form_field"></td>`
		2497	`<td bgcolor=#e4e9ec nowrap width="18px" class="form_field"></td>`
121	hknight	2498	`</tr>`
		2499	`<%If ((NOT rsCodeReviewURL.BOF) AND (NOT rsCodeReviewURL.EOF)) Then`
		2500	`While ((NOT rsCodeReviewURL.BOF) AND (NOT rsCodeReviewURL.EOF))%>`
		2501	`<tr>`
		2502	`<%If (Left(rsCodeReviewURL("url"),4) = "http") Then%>`
161	iaugusti	2503	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="<%=rsCodeReviewURL("url")%>" target="_blank" class="txt_linked"><%=rsCodeReviewURL("url")%></a></td>`
121	hknight	2504	`<%Else%>`
161	iaugusti	2505	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="<%=rsCodeReviewURL("full_url")%>" target="_blank" class="txt_linked"><%=rsCodeReviewURL("full_url")%></a></td>`
121	hknight	2506	`<%End If%>`
161	iaugusti	2507	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=rsCodeReviewURL("reason")%></td>`
5632	dpurdie	2508	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=DisplayDate(rsCodeReviewURL("date_of_review"))%></td>`
		2509	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=DisplayDate(rsCodeReviewURL("last_modified"))%></td>`
157	ghuddy	2510	`<%If (scriptName = "fixed_issues.asp") AND objAccessControl.UserLogedIn AND (pageIsEditable OR (pkgInfoHash.Item("dlocked") = "Y")) Then%>`
6827	dpurdie	2511	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="javascript:;" onclick="MM_openVixIFrame('_wform_edit_code_review_url.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&cr_id=<%=rsCodeReviewURL("cr_id")%>','Edit Code Review URL')" class="txt_linked"><img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle' alt="Edit this code review URL"></a></td>`
		2512	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="_remove_code_review_url.asp?cr_id=<%=rsCodeReviewURL("cr_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onclick="return vixConfirmDelete('this code review URL from Release Manager');"><img src="images/i_delete.gif" width="13" height="12" hspace="2" border="0" alt="Delete this code review URL" align='absmiddle'></a></td>`
121	hknight	2513	`<%Else%>`
161	iaugusti	2514	`<td bgcolor=#f5f5f5 class="form_item" valign="top"></td>`
		2515	`<td bgcolor=#f5f5f5 class="form_item" valign="top"></td>`
121	hknight	2516	`<%End If%>`
		2517	`</tr>`
		2518	`<%rsCodeReviewURL.MoveNext`
		2519	`WEnd`
		2520	`Else%>`
		2521	`<tr>`
161	iaugusti	2522	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2523	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2524	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2525	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2526	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2527	`<td bgcolor=#f5f5f5 class="form_item"></td>`
121	hknight	2528	`</tr>`
		2529	`<%End If`
		2530	`End If%>`
		2531	`</table>`
119	ghuddy	2532
121	hknight	2533	`<!-- Code Review URL section for last non-ripple build -->`
		2534	`<%If pkgInfoHash.Item ("comments") = "Rippled Build." Then`
		2535	`Call LastPvId(pkgInfoHash.Item ("pv_id"))`
		2536	`While rsQry("comments") = "Rippled Build."`
119	ghuddy	2537	`Call LastPvId(rsQry("last_pv_id"))`
121	hknight	2538	`Wend`
		2539	`Dim sOldPkgVersion`
157	ghuddy	2540	`Dim oldDlocked`
		2541	`Call Get_Pkg_Short_Info ( rsQry("pv_id"), NULL, NULL, sOldPkgVersion, NULL, NULL, oldDlocked )`
121	hknight	2542	`Call GetCodeReviewURLs( rsQry("pv_id"), rsCodeReviewURL )`
		2543	`%>`
		2544	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2545	`<tr>`
		2546	`<td align="left" valign="top" class="body_colb" <%If NOT IsNull(rsCodeReviewURL("url")) Then Response.Write("colspan='6'")%>>Code Review URL for last non-ripple build (<a class="lbl_link" href="fixed_issues.asp?pv_id=<%=rsQry("pv_id")%>"><%=sOldPkgVersion%></a>)</td>`
		2547	`</tr>`
		2548	`<%If IsNull(rsCodeReviewURL("url")) Then%>`
		2549	`<tr>`
161	iaugusti	2550	`<td bgcolor=#f5f5f5 width="100%" class="form_item" colspan="2">`
121	hknight	2551	`<span class='sublbox_txt'>No details found.</span>`
119	ghuddy	2552	`</td>`
121	hknight	2553	`</tr>`
		2554	`<%Else%>`
		2555	`<tr>`
161	iaugusti	2556	`<td bgcolor=#e4e9ec class="form_field">URL</td>`
		2557	`<td bgcolor=#e4e9ec width="30%" class="form_field">Reason for Review</td>`
		2558	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Date of Review</td>`
		2559	`<td bgcolor=#e4e9ec nowrap width="1%" class="form_field">Last Modified</td>`
		2560	`<td bgcolor=#e4e9ec nowrap width="18px" class="form_field"></td>`
		2561	`<td bgcolor=#e4e9ec nowrap width="18px" class="form_field"></td>`
121	hknight	2562	`</tr>`
		2563	`<%If ((NOT rsCodeReviewURL.BOF) AND (NOT rsCodeReviewURL.EOF)) Then`
119	ghuddy	2564	`While ((NOT rsCodeReviewURL.BOF) AND (NOT rsCodeReviewURL.EOF))%>`
121	hknight	2565	`<tr>`
		2566	`<%If (Left(rsCodeReviewURL("url"),4) = "http") Then%>`
161	iaugusti	2567	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="<%=rsCodeReviewURL("url")%>" target="_blank" class="txt_linked"><%=rsCodeReviewURL("url")%></a></td>`
121	hknight	2568	`<%Else%>`
161	iaugusti	2569	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="<%=rsCodeReviewURL("full_url")%>" target="_blank" class="txt_linked"><%=rsCodeReviewURL("full_url")%></a></td>`
121	hknight	2570	`<%End If%>`
161	iaugusti	2571	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=rsCodeReviewURL("reason")%></td>`
		2572	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=rsCodeReviewURL("date_of_review")%></td>`
		2573	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><%=rsCodeReviewURL("last_modified")%></td>`
157	ghuddy	2574	`<%If (scriptName = "fixed_issues.asp") AND objAccessControl.UserLogedIn AND (pageIsEditable OR (oldDlocked = "Y")) Then%>`
6827	dpurdie	2575	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="javascript:;" onclick="MM_openVixIFrame('_wform_edit_code_review_url.asp?pv_id=<%=rsCodeReviewURL("pv_id")%>&rtag_id=<%=parRtag_id%>&cr_id=<%=rsCodeReviewURL("cr_id")%>','Edit Code Review URL')" class="txt_linked"><img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align='absmiddle' alt="Edit this code review URL"></a></td>`
		2576	`<td bgcolor=#f5f5f5 class="form_item" valign="top"><a href="_remove_code_review_url.asp?cr_id=<%=rsCodeReviewURL("cr_id")%>&pv_id=<%=rsCodeReviewURL("pv_id")%>&rtag_id=<%=parRtag_id%>" onclick="return vixConfirmDelete('this code review URL from Release Manager');"><img src="images/i_delete.gif" width="13" height="12" hspace="2" border="0" alt="Delete this code review URL" align='absmiddle'></a></td>`
121	hknight	2577	`<%Else%>`
161	iaugusti	2578	`<td bgcolor=#f5f5f5 class="form_item" valign="top"></td>`
		2579	`<td bgcolor=#f5f5f5 class="form_item" valign="top"></td>`
121	hknight	2580	`<%End If%>`
		2581	`</tr>`
		2582	`<%rsCodeReviewURL.MoveNext`
119	ghuddy	2583	`WEnd`
121	hknight	2584	`Else%>`
119	ghuddy	2585	`<tr>`
161	iaugusti	2586	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2587	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2588	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2589	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2590	`<td bgcolor=#f5f5f5 class="form_item"></td>`
		2591	`<td bgcolor=#f5f5f5 class="form_item"></td>`
119	ghuddy	2592	`</tr>`
121	hknight	2593	`<%End If`
		2594	`End If%>`
		2595	`</table>`
		2596	`<%End If%>`
119	ghuddy	2597
121	hknight	2598	`</fieldset>`
		2599	`<br>`
119	ghuddy	2600	`<!-- ADDITIONAL NOTES ------------------------------------------------------------------------------------------------------------------->`
6324	dpurdie	2601	`<fieldset class="fset">`
6827	dpurdie	2602	`<legend class="body_colb"><img src="images/i_additional_notes.gif" width="26" height="20" hspace="4" border="0" align='absmiddle' alt="">Additional Notes</legend>`
6324	dpurdie	2603	`<div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">`
		2604	`<%If pageIsEditable Then%>`
6827	dpurdie	2605	`<a href='javascript:;' onClick="MM_openVixIFrame('_wform_additional_note.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Additional Notes')" class="txt_linked">New Note<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align='absmiddle' alt="Add new note."></a>`
6324	dpurdie	2606	`<%End If%>`
		2607	`</div>`
121	hknight	2608	`<a name="ADDITIONAL_NOTES"></a>`
		2609	`<table width="100%" border="0" cellspacing="1" cellpadding="2">`
		2610	`<%Set rsQry = OraDatabase.DbCreateDynaset( SQL_Additional_Notes ( parPv_id ), cint(0))%>`
		2611	`<%If rsQry.RecordCount < 1 Then%>`
		2612	`<tr>`
161	iaugusti	2613	`<td class="form_field" width="100%" bgcolor=#f5f5f5> </td>`
121	hknight	2614	`</tr>`
		2615	`<%End If%>`
		2616	`<%While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))%>`
		2617	`<tr>`
161	iaugusti	2618	`<td width="100%" nowrap bgcolor=#e4e9ec class="body_col">`
121	hknight	2619	`<%If pageIsEditable Then%>`
6827	dpurdie	2620	`<a href="javascript:;" onClick="MM_openVixIFrame('_wform_update_additional_note.asp?note_id=<%=rsQry("note_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Update Note')" class="body_col"><img src="images/i_edit.gif" alt="Edit" width="12" height="12" hspace="3" vspace="3" border="0" align='absmiddle'><%=To_HTML (rsQry("note_title"))%></a>`
121	hknight	2621	`<%Else%>`
		2622	`<%=To_HTML (rsQry("note_title"))%>`
		2623	`<%End If%>`
		2624	`</td>`
161	iaugusti	2625	`<td width="1" bgcolor=#e4e9ec>`
121	hknight	2626	`<%If pageIsEditable Then%>`
5190	dpurdie	2627	`<a href="_remove_additional_note.asp?note_id=<%=rsQry("note_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" onClick="return vixConfirmDelete('this note');"><img src="images/i_delete.gif" alt="Remove this note." width="13" height="12" hspace="3" border="0"></a>`
121	hknight	2628	`<%End If%>`
		2629	`</td>`
		2630	`</tr>`
		2631	`<tr>`
161	iaugusti	2632	`<td colspan="2" bgcolor=#f5f5f5 class="sublbox_txt">`
4230	dpurdie	2633	`<%=NewLine_To_BR( To_HTML ( rsQry("note_body") ) )%><br>`
121	hknight	2634	`<span class="rep_small">Last Modified: <%=rsQry("lastmod")%></span>`
		2635	`</td>`
		2636	`</tr>`
		2637	`<tr>`
		2638	`<td colspan="2"><img src='images/spacer.gif' width='2' height='2'></td>`
		2639	`</tr>`
		2640	`<%rsQry.MoveNext`
		2641	`WEnd%>`
		2642	`</table>`
		2643	`</fieldset>`
5932	dpurdie	2644	`<br>`
		2645	`<%End If%>`
		2646

Subversion Repositories DevTools

(root)/ManagerSuite/Release_Manager/trunk/web/_release_notes.asp – Rev 6827