WebSVN – DevTools – Diff – /ManagerSuite/Release_Manager/trunk/web/_menu_def.asp



Const MenuHeaderDefined = 1
Const LMENU_TICK = "<img src=""images/i_boxtick_on.gif"" width=""13"" height=""13"" border=""0"" vspace=""2"" align=""absmiddle"">"
Const LMENU_BLANK = "<img src=""images/spacer.gif"" width=""13"" height=""13"" border=""0"" vspace=""2"" align=""absmiddle"">"
'------------ Variable Definition -------------
Dim TABarray1, TABarray2, TABarray3, TABarray4, TABarray5, TABarray5D, TABarray6, TABarray6D
Dim imgDependenciesIcon, imgReleaseNotesIcon, imgPatchesIcon, imgUsedByIcon
Dim ReleaseMode
 
'-- GLOBAL VARIABLES --------------------------
imgDependenciesIcon = "<img src='images/i_dependency.gif' border='0' align='absmiddle' hspace='3'>"
imgUsedByIcon = "<img src='images/i_used_by.gif' border='0' align='absmiddle' hspace='3'>"
imgReleaseNotesIcon = "<img src='images/i_release_note.gif' border='0' align='absmiddle' hspace='3'>"
imgPatchesIcon = "<img src='images/i_patch_small.gif' border='0' align='absmiddle' hspace='3'>"
ReleaseMode = GetReleaseMode( Request("rtag_id") )
 
'----------------------------------------------

   If IsNull(pkgInfoHash.Item ("is_patch")) Then
      If CInt(pkgInfoHash.Item ("base_view_id")) = enumBASE_VIEW_PRODUCTS  OR CInt(pkgInfoHash.Item ("base_view_id")) = enumAUTOPRODUCTS_BASE_VIEW_ID Then
         ' Tab for PRODUCTS
         TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?"& Persists_Query_String( Empty ), _
                             "Runtime@runtime_dependencies.asp?"& Persists_Query_String( Empty ), _
                             imgUsedByIcon & "Used by@used_by.asp?"& Persists_Query_String( Empty ), _
                             "Processes@process_dependencies.asp?"& Persists_Query_String( Empty ), _
                             imgPatchesIcon &"Patches@patches.asp?"& Persists_Query_String( Empty ), _
                             imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?"& Persists_Query_String( Empty ), _
                             "Documentation@documentation.asp?" & Persists_Query_String( Empty ), _
                             "Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _

                             "Notifications@notifications.asp?"& Persists_Query_String( Empty ) )
      Else
         ' Tabs for other packages
         TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?"& Persists_Query_String( Empty ), _
                             "Runtime@runtime_dependencies.asp?"& Persists_Query_String( Empty ), _
                             imgUsedByIcon & "Used by@used_by.asp?"& Persists_Query_String( Empty ), _
                             "Processes@process_dependencies.asp?"& Persists_Query_String( Empty ), _
                             imgPatchesIcon &"Patches@patches.asp?"& Persists_Query_String( Empty ), _
                             imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?"& Persists_Query_String( Empty ), _
                             "Documentation@documentation.asp?" & Persists_Query_String( Empty ), _
                             "Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _

                             "Notifications@notifications.asp?"& Persists_Query_String( Empty ) )
      End If
   Else
      ' Tabs for Patches
      TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _
                          imgUsedByIcon & "Used by@used_by.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _
                          imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _
                          "Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _
                          "Action Log@action_log.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"))
   End If
 

                    "History@_wform_issues_history.asp?iss_db="& Request("iss_db") &"&iss_id="& Request("iss_id") &"&iss_db_name="& Request("iss_db_name") &"&iss_id_num="& Request("iss_id_num") )
 
' Tabs for History window
TABarray5 = Array ( imgDependenciesIcon &"Dependencies@_wform_versions_history_dependencies.asp?"& Persists_Query_String( Empty ), _
                    "Runtime@_wform_versions_history_runtime.asp?"& Persists_Query_String( Empty ), _
                    imgUsedByIcon & "Used by@_wform_versions_history_used_by.asp?"& Persists_Query_String( Empty ), _
                    "Patches@_wform_versions_history_patches.asp?" & Persists_Query_String( Empty ), _
                    imgReleaseNotesIcon &"Release Notes@_wform_versions_history_release_notes.asp?" & Persists_Query_String( Empty ), _
                    "Documentation@_wform_versions_history_documentation.asp?"& Persists_Query_String( Empty ), _
                    "Files and Folders@_wform_versions_history_files_and_folders.asp?" & Persists_Query_String( Empty ), _
                    "Action Log@_wform_versions_history_action_log.asp?"& Persists_Query_String( Empty ) ,_

Subversion Repositories DevTools

(root)/ManagerSuite/Release_Manager/trunk/web/_menu_def.asp – Rev 6770 → 6786

Rev 6770		Rev 6786
Line 8...		Line 8...
8	`Const MenuHeaderDefined = 1`	8	`Const MenuHeaderDefined = 1`
9	`Const LMENU_TICK = "<img src=""images/i_boxtick_on.gif"" width=""13"" height=""13"" border=""0"" vspace=""2"" align=""absmiddle"">"`	9	`Const LMENU_TICK = "<img src=""images/i_boxtick_on.gif"" width=""13"" height=""13"" border=""0"" vspace=""2"" align=""absmiddle"">"`
10	`Const LMENU_BLANK = "<img src=""images/spacer.gif"" width=""13"" height=""13"" border=""0"" vspace=""2"" align=""absmiddle"">"`	10	`Const LMENU_BLANK = "<img src=""images/spacer.gif"" width=""13"" height=""13"" border=""0"" vspace=""2"" align=""absmiddle"">"`
11	`'------------ Variable Definition -------------`	11	`'------------ Variable Definition -------------`
12	`Dim TABarray1, TABarray2, TABarray3, TABarray4, TABarray5, TABarray5D, TABarray6, TABarray6D`	12	`Dim TABarray1, TABarray2, TABarray3, TABarray4, TABarray5, TABarray5D, TABarray6, TABarray6D`
13	`Dim imgDependenciesIcon, imgReleaseNotesIcon, imgPatchesIcon`	13	`Dim imgDependenciesIcon, imgReleaseNotesIcon, imgPatchesIcon, imgUsedByIcon`
14	`Dim ReleaseMode`	14	`Dim ReleaseMode`
15		15
16	`'-- GLOBAL VARIABLES --------------------------`	16	`'-- GLOBAL VARIABLES --------------------------`
17	`imgDependenciesIcon = "<img src='images/i_dependency.gif' border='0' align='absmiddle' hspace='3'>"`	17	`imgDependenciesIcon = "<img src='images/i_dependency.gif' border='0' align='absmiddle' hspace='3'>"`
-		18	`imgUsedByIcon = "<img src='images/i_used_by.gif' border='0' align='absmiddle' hspace='3'>"`
18	`imgReleaseNotesIcon = "<img src='images/i_release_note.gif' border='0' align='absmiddle' hspace='3'>"`	19	`imgReleaseNotesIcon = "<img src='images/i_release_note.gif' border='0' align='absmiddle' hspace='3'>"`
19	`imgPatchesIcon = "<img src='images/i_patch_small.gif' border='0' align='absmiddle' hspace='3'>"`	20	`imgPatchesIcon = "<img src='images/i_patch_small.gif' border='0' align='absmiddle' hspace='3'>"`
20	`ReleaseMode = GetReleaseMode( Request("rtag_id") )`	21	`ReleaseMode = GetReleaseMode( Request("rtag_id") )`
21		22
22	`'----------------------------------------------`	23	`'----------------------------------------------`
Line 24...		Line 25...
24	`If IsNull(pkgInfoHash.Item ("is_patch")) Then`	25	`If IsNull(pkgInfoHash.Item ("is_patch")) Then`
25	`If CInt(pkgInfoHash.Item ("base_view_id")) = enumBASE_VIEW_PRODUCTS OR CInt(pkgInfoHash.Item ("base_view_id")) = enumAUTOPRODUCTS_BASE_VIEW_ID Then`	26	`If CInt(pkgInfoHash.Item ("base_view_id")) = enumBASE_VIEW_PRODUCTS OR CInt(pkgInfoHash.Item ("base_view_id")) = enumAUTOPRODUCTS_BASE_VIEW_ID Then`
26	`' Tab for PRODUCTS`	27	`' Tab for PRODUCTS`
27	`TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?"& Persists_Query_String( Empty ), _`	28	`TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?"& Persists_Query_String( Empty ), _`
28	`"Runtime@runtime_dependencies.asp?"& Persists_Query_String( Empty ), _`	29	`"Runtime@runtime_dependencies.asp?"& Persists_Query_String( Empty ), _`
29	`"Used by@used_by.asp?"& Persists_Query_String( Empty ), _`	30	`imgUsedByIcon & "Used by@used_by.asp?"& Persists_Query_String( Empty ), _`
30	`"Processes@process_dependencies.asp?"& Persists_Query_String( Empty ), _`	31	`"Processes@process_dependencies.asp?"& Persists_Query_String( Empty ), _`
31	`imgPatchesIcon &"Patches@patches.asp?"& Persists_Query_String( Empty ), _`	32	`imgPatchesIcon &"Patches@patches.asp?"& Persists_Query_String( Empty ), _`
32	`imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?"& Persists_Query_String( Empty ), _`	33	`imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?"& Persists_Query_String( Empty ), _`
33	`"Documentation@documentation.asp?" & Persists_Query_String( Empty ), _`	34	`"Documentation@documentation.asp?" & Persists_Query_String( Empty ), _`
34	`"Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _`	35	`"Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _`
Line 37...		Line 38...
37	`"Notifications@notifications.asp?"& Persists_Query_String( Empty ) )`	38	`"Notifications@notifications.asp?"& Persists_Query_String( Empty ) )`
38	`Else`	39	`Else`
39	`' Tabs for other packages`	40	`' Tabs for other packages`
40	`TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?"& Persists_Query_String( Empty ), _`	41	`TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?"& Persists_Query_String( Empty ), _`
41	`"Runtime@runtime_dependencies.asp?"& Persists_Query_String( Empty ), _`	42	`"Runtime@runtime_dependencies.asp?"& Persists_Query_String( Empty ), _`
42	`"Used by@used_by.asp?"& Persists_Query_String( Empty ), _`	43	`imgUsedByIcon & "Used by@used_by.asp?"& Persists_Query_String( Empty ), _`
43	`"Processes@process_dependencies.asp?"& Persists_Query_String( Empty ), _`	44	`"Processes@process_dependencies.asp?"& Persists_Query_String( Empty ), _`
44	`imgPatchesIcon &"Patches@patches.asp?"& Persists_Query_String( Empty ), _`	45	`imgPatchesIcon &"Patches@patches.asp?"& Persists_Query_String( Empty ), _`
45	`imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?"& Persists_Query_String( Empty ), _`	46	`imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?"& Persists_Query_String( Empty ), _`
46	`"Documentation@documentation.asp?" & Persists_Query_String( Empty ), _`	47	`"Documentation@documentation.asp?" & Persists_Query_String( Empty ), _`
47	`"Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _`	48	`"Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _`
Line 50...		Line 51...
50	`"Notifications@notifications.asp?"& Persists_Query_String( Empty ) )`	51	`"Notifications@notifications.asp?"& Persists_Query_String( Empty ) )`
51	`End If`	52	`End If`
52	`Else`	53	`Else`
53	`' Tabs for Patches`	54	`' Tabs for Patches`
54	`TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _`	55	`TABarray1 = Array ( imgDependenciesIcon &"Dependencies@dependencies.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _`
55	`"Used by@used_by.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _`	56	`imgUsedByIcon & "Used by@used_by.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _`
56	`imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _`	57	`imgReleaseNotesIcon &"Release Notes@fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"), _`
57	`"Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _`	58	`"Files and Folders@files_and_folders.asp?" & Persists_Query_String( Empty ), _`
58	`"Action Log@action_log.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"))`	59	`"Action Log@action_log.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"))`
59	`End If`	60	`End If`
60		61
Line 80...		Line 81...
80	`"History@_wform_issues_history.asp?iss_db="& Request("iss_db") &"&iss_id="& Request("iss_id") &"&iss_db_name="& Request("iss_db_name") &"&iss_id_num="& Request("iss_id_num") )`	81	`"History@_wform_issues_history.asp?iss_db="& Request("iss_db") &"&iss_id="& Request("iss_id") &"&iss_db_name="& Request("iss_db_name") &"&iss_id_num="& Request("iss_id_num") )`
81		82
82	`' Tabs for History window`	83	`' Tabs for History window`
83	`TABarray5 = Array ( imgDependenciesIcon &"Dependencies@_wform_versions_history_dependencies.asp?"& Persists_Query_String( Empty ), _`	84	`TABarray5 = Array ( imgDependenciesIcon &"Dependencies@_wform_versions_history_dependencies.asp?"& Persists_Query_String( Empty ), _`
84	`"Runtime@_wform_versions_history_runtime.asp?"& Persists_Query_String( Empty ), _`	85	`"Runtime@_wform_versions_history_runtime.asp?"& Persists_Query_String( Empty ), _`
85	`"Used by@_wform_versions_history_used_by.asp?"& Persists_Query_String( Empty ), _`	86	`imgUsedByIcon & "Used by@_wform_versions_history_used_by.asp?"& Persists_Query_String( Empty ), _`
86	`"Patches@_wform_versions_history_patches.asp?" & Persists_Query_String( Empty ), _`	87	`"Patches@_wform_versions_history_patches.asp?" & Persists_Query_String( Empty ), _`
87	`imgReleaseNotesIcon &"Release Notes@_wform_versions_history_release_notes.asp?" & Persists_Query_String( Empty ), _`	88	`imgReleaseNotesIcon &"Release Notes@_wform_versions_history_release_notes.asp?" & Persists_Query_String( Empty ), _`
88	`"Documentation@_wform_versions_history_documentation.asp?"& Persists_Query_String( Empty ), _`	89	`"Documentation@_wform_versions_history_documentation.asp?"& Persists_Query_String( Empty ), _`
89	`"Files and Folders@_wform_versions_history_files_and_folders.asp?" & Persists_Query_String( Empty ), _`	90	`"Files and Folders@_wform_versions_history_files_and_folders.asp?" & Persists_Query_String( Empty ), _`
90	`"Action Log@_wform_versions_history_action_log.asp?"& Persists_Query_String( Empty ) ,_`	91	`"Action Log@_wform_versions_history_action_log.asp?"& Persists_Query_String( Empty ) ,_`