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

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

Subversion Repositories DevTools

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