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

Subversion Repositories DevTools

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