Subversion Repositories DevTools

Rev

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

Rev 13 Rev 29
Line 22... Line 22...
22
'----------------------------------------------
22
'----------------------------------------------
23
%>
23
%>
24
<%
24
<%
25
Select Case CInt( StateTypeEnum )
25
Select Case CInt( StateTypeEnum )
26
	Case enumDB_STATE_TYPE_BOM_CREATOR
26
	Case enumDB_STATE_TYPE_BOM_CREATOR
27
		aStateOptionList = Array( "pmiNewBom", _
27
		aStateOptionList = Array( "pmiUnDeployView", _
-
 
28
								  enumSEPARATOR_LABEL, _					
-
 
29
								  "pmiNewBom", _
28
								  "pmiDestroyBom", _
30
								  "pmiDestroyBom", _
29
								  enumSEPARATOR_LABEL, _
31
								  enumSEPARATOR_LABEL, _
30
								  "pmiLockBom", _
32
								  "pmiLockBom", _
31
								  "pmiUnlockBom", _
33
								  "pmiUnlockBom", _
32
								  enumSEPARATOR_LABEL, _
34
								  enumSEPARATOR_LABEL, _
Line 35... Line 37...
35
								  enumSEPARATOR_LABEL, _
37
								  enumSEPARATOR_LABEL, _
36
								  "pmiReleaseTo" )
38
								  "pmiReleaseTo" )
37
		
39
		
38
		AM_StaticObjName = "pmoCreator"
40
		AM_StaticObjName = "pmoCreator"
39
		
41
		
-
 
42
	Case enumDB_STATE_TYPE_BOM_INTEGRATOR
-
 
43
		aStateOptionList = Array( "pmiNewBom", _
-
 
44
								  "pmiDestroyBom", _
-
 
45
								  enumSEPARATOR_LABEL, _
-
 
46
								  "pmiLockBom", _
-
 
47
								  "pmiUnlockBom", _
-
 
48
								  enumSEPARATOR_LABEL, _
-
 
49
								  "pmiVersionTree", _
-
 
50
								  "pmiImportExportBom", _
-
 
51
								  enumSEPARATOR_LABEL, _
-
 
52
								  "pmiReleaseTo" )
-
 
53
		
-
 
54
		AM_StaticObjName = "pmoIntegrator"		
-
 
55
		
40
	Case enumDB_STATE_TYPE_BOM_LOCAL_TESTER
56
	Case enumDB_STATE_TYPE_BOM_LOCAL_TESTER
41
		aStateOptionList = Array( "pmiAcceptBom", _
57
		aStateOptionList = Array( "pmiAcceptBom", _
42
								  "pmiRejectBom", _
58
								  "pmiRejectBom", _
43
								  enumSEPARATOR_LABEL, _
59
								  enumSEPARATOR_LABEL, _
44
								  "pmiVersionTree", _
60
								  "pmiVersionTree", _
Line 55... Line 71...
55
								  "pmiVersionTree", _
71
								  "pmiVersionTree", _
56
								  enumSEPARATOR_LABEL, _
72
								  enumSEPARATOR_LABEL, _
57
								  "pmiReleaseTo" )
73
								  "pmiReleaseTo" )
58
		
74
		
59
		AM_StaticObjName = "pmoExternalTester"
75
		AM_StaticObjName = "pmoExternalTester"
-
 
76
 
-
 
77
		
-
 
78
	Case enumDB_STATE_TYPE_BOM_PRODUCTION
-
 
79
				aStateOptionList = Array( _
-
 
80
								  "pmiAcceptBom", _
-
 
81
								  "pmiRejectBom", _
-
 
82
								  enumSEPARATOR_LABEL, _
-
 
83
								  "pmiVersionTree" )
-
 
84
		
-
 
85
		AM_StaticObjName = "pmoProduction"		
60
	
86
	
61
End Select
87
End Select
62
 
88
 
63
 
89
 
64
If objAccessControl.IsVisible ( AM_StaticObjName ) Then
90
If objAccessControl.IsVisible ( AM_StaticObjName ) Then